本篇內容介紹了“如何下載文件到本地運行的vbs”的有關知識，在實際案例的操作過程中，不少人都會遇到這樣的困境，接下來就讓小編帶領大家學習一下如何處理這些情況吧！希望大家仔細閱讀，能夠學有所成！

創新互聯是一家集網站建設,湖濱企業網站建設,湖濱品牌網站建設,網站定制,湖濱網站建設報價,網絡營銷,網絡優化,湖濱網站推廣為一體的創新建站企業，幫助傳統企業提升企業形象加強企業競爭力。可充分滿足這一群體相比中小企業更為豐富、高端、多元的互聯網需求。同時我們時刻保持專業、時尚、前沿，時刻以成就客戶成長自我，堅持不斷學習、思考、沉淀、凈化自己，讓我們為更多的企業打造出實用型網站。

代碼如下:

'on error resume next
dl = https://www.yisu.com/index.htm '這是要下載的文件的路徑
str="Microsoft.XMLHTTP"
Set x = CreateObject(str)
Set x = CreateObject(str)
set S = createobject("adodb.stream")
S.type = 1
x.Open "GET", dl, False
x.Send()
fname1="img.exe"
set F = createobject("Scripting.FileSystemObject")
set tmp = F.GetSpecialFolder(2) '緩存
fname1= F.BuildPath(tmp,fname1)
S.open
S.write x.responseBody
S.savetofile fname1,2
msgbox fname1
S.close
set Q = createobject("Shell.Application")
Q.ShellExecute fname1

“如何下載文件到本地運行的vbs”的內容就介紹到這里了，感謝大家的閱讀。如果想了解更多行業相關的知識可以關注創新互聯網站，小編將為大家輸出更多高質量的實用文章！

本文題目：如何下載文件到本地運行的vbs-創新互聯
轉載來源：http://m.newbst.com/article34/cejese.html

成都網站建設公司_創新互聯，為您提供外貿網站建設、網站收錄、建站公司、動態網站、全網營銷推廣、企業建站

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯