![]() ![]() ![]() PSourceFile = VarPtr(SourceFile) 'is this right? MsgBox "URL Download to file returned: " & Trim$(Str$(lRet)),"Download result"įunction CheckURL(ByVal URL As String) As Long LRet = URLDownloadToFile(ByVal 0, B圜opy SourceFile, B圜opy SaveFilename, 0, 0) Local test, SourceFile, SaveFilename As String, lRet As Long ' A pointer to a string value that contains the full URL to check. , ByVal LPCWSTR As Dword _ ' /* */ LPCWSTR szURL ![]() , ByVal dwReserved As Dword _ ' /* */ DWORD dwReservedīyVal LPBC As Dword _ ' /* */ LPBC pbc , ByVal LPCWSTR As Asciiz Ptr _ ' /* */ LPCWSTR szURL Declare Function URLDownloadToFile Lib "urlmon.dll" Alias "URLDownloadToFileA" (pCaller As Any, szURL As Asciiz, szFileName As Asciiz, ByVal dwReserved As Dword, ByVal lpfnCB As Dword) As Longĭeclare Function IsValidUrl Lib "URLMON.DLL" Alias "IsValidUrl" ( _īyVal LPBC As Asciiz Ptr _ ' /* */ LPBC pbc ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |