需求一个函数的帮助。。

Question

URLDownLoadFile
我的msdn上没有，谁能给我一份！
我想要出现进度条，可不知参数是什么！

Answer 1

You can also use URLDownloadFile to get a remote file,if you use this function,you need not care about the flag about the CreateFile function. Another good way to get remote file is socked,it can control the process,so cool! If you have intersting in socked,try it!

Answer 2

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 LongFunction DownloadFile(URL As String, _
  LocalFilename As String) As Boolean
  
  Dim lngRetVal As Long
  
  lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
  
  If lngRetVal = 0 Then DownloadFile = True
  
End Function