关于用VB下载文件的方法

来源：百度知道 编辑：UC知道 时间：2024/06/11 01:49:44
用vb下载一个网页上的文件。如http://www.abc.com/1.exe 怎么才能一运行就自动下载，并且放到指定文件夹内，然后自动运行这个文件。

在下菜鸟，初学vb请各位大虾多多指教！！！
qq：674874270

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

sub cmmand1_click()
R= URLDownloadToFile(0,"http://www.abc.com/1.exe" , "c:\1.exe", 0, 0)
shell "c:\1.exe"
end sub