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

成都做網(wǎng)站、成都網(wǎng)站制作服務(wù)團(tuán)隊(duì)是一支充滿著熱情的團(tuán)隊(duì),執(zhí)著、敏銳、追求更好,是創(chuàng)新互聯(lián)的標(biāo)準(zhǔn)與要求,同時(shí)竭誠(chéng)為客戶提供服務(wù)是我們的理念。成都創(chuàng)新互聯(lián)公司把每個(gè)網(wǎng)站當(dāng)做一個(gè)產(chǎn)品來(lái)開(kāi)發(fā),精雕細(xì)琢,追求一名工匠心中的細(xì)致,我們更用心!
真的是做下載文件,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大同小異
方法是:先獲取網(wǎng)頁(yè)代碼放在諸如richbox里面,在用這個(gè)控件的save方法存為格式為mht的網(wǎng)頁(yè)
提供兩個(gè)思路
用printscreen,將其保存到文件,再調(diào)用outlook發(fā)出去,但是您說(shuō)的超出一屏,就麻煩了;
以下代碼保存為文件,引用自MSDN,由于我的SD版本不支持我的outlook,所以暫時(shí)無(wú)法給發(fā)送郵件的例子,請(qǐng)參考吧!
system.Windows.Forms.SendKeys.Send("%{PRTSC}")
? ? ? ?If Not System.Windows.Forms.Clipboard.GetDataObject() Is Nothing Then
? ? ? Dim oDataObj As IDataObject = System.Windows.Forms.Clipboard.GetDataObject()
? ? ? If oDataObj.GetDataPresent(System.Windows.Forms.DataFormats.Bitmap) Then
? ? ? ? ? Dim oImgObj As System.Drawing.Image = oDataObj.GetData(DataFormats.Bitmap, True)
? ? ? ? ? 'To Save as Bitmap
? ? ? ? ? oImgObj.Save("F:\Test.bmp", System.Drawing.Imaging.ImageFormat.Bmp)
? ? ? ? ? 'To Save as Jpeg
? ? ? ? ? oImgObj.Save("D:\Test.jpeg", System.Drawing.Imaging.ImageFormat.Jpeg)
? ? ? ? ? 'To Save as Gif
? ? ? ? ? oImgObj.Save("d:\Test.gif", System.Drawing.Imaging.ImageFormat.Gif)
? ? ? End If
? End If
2.另外出出報(bào)表,再調(diào)用outlook發(fā)出去,只給出數(shù)據(jù)性報(bào)表,而不一定是窗體本身;
網(wǎng)站題目:vb.net保存網(wǎng)頁(yè) vb怎么保存窗體文件
轉(zhuǎn)載注明:http://chinadenli.net/article24/dojipje.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站收錄、App開(kāi)發(fā)、App設(shè)計(jì)、靜態(tài)網(wǎng)站、做網(wǎng)站、定制網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)