vb.net作業(yè)，打開(kāi)某一文件夾，將內(nèi)容倒排，保存到另一文件夾怎么做

'這是VB的要先引用Microsoft Scripting RunTime，下面的例子是找叫cmd.xxx的文件的

創(chuàng)新互聯(lián)建站長(zhǎng)期為成百上千家客戶(hù)提供的網(wǎng)站建設(shè)服務(wù)，團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年，關(guān)注不同地域、不同群體，并針對(duì)不同對(duì)象提供差異化的產(chǎn)品和服務(wù)；打造開(kāi)放共贏平臺(tái)，與合作伙伴共同營(yíng)造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為五通橋企業(yè)提供專(zhuān)業(yè)的做網(wǎng)站、網(wǎng)站制作，五通橋網(wǎng)站改版等技術(shù)服務(wù)。擁有10年豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開(kāi)發(fā)。

Private Sub Command1_Click()

Dim m_objFSO As New FileSystemObject

Dim objFolder As Scripting.Folder '文件夾對(duì)象

Dim objFile As Scripting.File '文件對(duì)象

Set objFolder = m_objFSO.GetFolder("c:/test")

For Each objFile In objFolder.Files

Dim filenames() As String

filenames = Split(objFile.Name, ".")

If filenames(0) = "cmd" Then

FileCopy objFile.Path, "c:/TestCMD/" "newName." filenames(1)

End If

Next objFile

End Sub

-----------------------------------這是VB.net的--------------------------

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim i As Integer

Dim files() As String

files = System.IO.Directory.GetFiles("C:/test")

For i = 0 To files.Length - 1

Dim filenames() As String

filenames = files(i).Substring(files(i).LastIndexOf("\") + 1).Split(".")

If filenames(0) = "cmd" Then

FileCopy(files(i), "c:/TestCMD/" "newName." filenames(1))

End If

Next

End Sub

vb.net webbrowser 自動(dòng)保存文件到指定文件夾

老實(shí)說(shuō)不一定要webBrowser，這是Windows下載文件界面啊，不是VB.Net畫(huà)出來(lái)的。

真的是做下載文件，WebClient.DownloadFile方法就足夠了，調(diào)用方法后會(huì)自動(dòng)彈出Windows下載任務(wù)窗口。

在VS.NET里也提供了一個(gè)com接口，可以直接調(diào)用迅雷的dll，下載文件可以讓你自由選擇是用迅雷下載還是通過(guò)Windows下載任務(wù)來(lái)執(zhí)行下載。

webBroser下載文件

FileInfo?file?=?new?System.IO.FileInfo(Server.MapPath(path));

if?(File.Exists(Server.MapPath(path)))

{

string?name?=?Path.GetFileName(Server.MapPath(path));

//存在文件

Response.Clear();

Response.Buffer?=?false;

//通知瀏覽器下載文件而不是打開(kāi)?

Response.ContentType?=?"application/octet-stream";

//下載的文件名

Response.AppendHeader("content-disposition",?"attachment;filename="?+?name);

//文件的大小

Response.AppendHeader("Content-Length",???file.Length.ToString());

Response.WriteFile(path);

}

介紹一個(gè)更簡(jiǎn)單的方法給你，從webbrowser獲取點(diǎn)擊的超連接，然后自由選擇下載，先在引用里引用com組件

然后在點(diǎn)擊事件中加代碼

string?url?=?webBrowser1.Document.Links[1].GetAttribute("href");

ThunderAgentLib.AgentClass?agent?=?new??ThunderAgentLib.AgentClass();//創(chuàng)建對(duì)象?

agent.AddTask(url,?"默認(rèn)保存文件名",?"C:\\默認(rèn)路徑",?"",?"",?1,?0,?5);

agent.CommitTasks2(1);//提交

我用的是C#代碼，VB.NET大同小異

vb.net保存另存

你就不能這樣保存么？ ↓

Static SaveNumber as Integer

SaveNumber += 1

Dim SavePath as String = "C:\ytakqi" SaveNumber ".png"

bit.Save(SavePath)

vbnet保存文件沒(méi)有路徑創(chuàng)建

沒(méi)有足夠的權(quán)限訪問(wèn)該目錄。根據(jù)相關(guān)資料查詢(xún)，右鍵單擊要在其中創(chuàng)建文件夾的文件夾。檢查安全選項(xiàng)卡。