vb點虐 指定保存文件 vb保存文件代碼

vb點虐 webbrowser 自動保存文件到指定文件夾

老實說不一定要webBrowser,這是Windows下載文件界面啊,不是VB.Net畫出來的。

創(chuàng)新互聯(lián)公司于2013年開始,是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司,擁有項目成都網(wǎng)站設(shè)計、成都網(wǎng)站建設(shè)網(wǎng)站策劃,項目實施與項目整合能力。我們以讓每一個夢想脫穎而出為使命,1280元云城做網(wǎng)站,已為上家服務(wù),為云城各地企業(yè)和個人服務(wù),聯(lián)系電話:18982081108

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

在VS.NET里也提供了一個com接口,可以直接調(diào)用迅雷的dll,下載文件可以讓你自由選擇是用迅雷下載還是通過Windows下載任務(wù)來執(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;

//通知瀏覽器下載文件而不是打開?

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

//下載的文件名

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

//文件的大小

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

Response.WriteFile(path);

}

介紹一個更簡單的方法給你,從webbrowser獲取點擊的超連接,然后自由選擇下載,先在引用里引用com組件

然后在點擊事件中加代碼

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

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

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

agent.CommitTasks2(1);//提交

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

VB中怎么把自己選定目錄下的文件保存到指定目錄

Private Sub Command1_Click()

Dim sf As String, df As String

CommonDialog1.ShowOpen

sf = CommonDialog1.FileName

If sf "" Then

df = "e:\tmp\" CommonDialog1.FileTitle '保存到e:\tmp文件夾,自己改

If Dir(df) "" Then

If MsgBox("目標(biāo)文件已存在,是否覆蓋?", vbYesNo) vbYes Then Exit Sub

End If

FileCopy sf, df

MsgBox sf vbCrLf "已保存為" vbCrLf df

End If

End Sub

vb點虐 保存文件幫忙

你就不能這樣保存么? ?↓

Static?SaveNumber?as?Integer

SaveNumber?+=?1

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

bit.Save(SavePath)

分享名稱:vb點虐 指定保存文件 vb保存文件代碼
網(wǎng)頁鏈接:http://www.bm7419.com/article28/ddehjjp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供企業(yè)建站、靜態(tài)網(wǎng)站、虛擬主機(jī)全網(wǎng)營銷推廣、外貿(mào)建站、移動網(wǎng)站建設(shè)

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)

成都app開發(fā)公司