[AccessD] A2003:Connect to a text file at a web address

MartyConnelly martyconnelly at shaw.ca
Mon Dec 20 12:58:55 CST 2004


Well there is the Inet Internet transfer control not sure if it is 
attached to IE dll's
or you could try
  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 tryurl()
  Dim retVal As Long
  Dim URL As String
  Dim LocalFileName As String

  ' change this line to the URL of the file:
  URL = 
"http://www5.brinkster.com/mconnelly/GenericDB/ordersSubFormform.txt"

  ' change this line to the local filename to save the file as:
  LocalFileName = "c:\temp\testform.txt"

  retVal = URLDownloadToFile(0, URL, LocalFileName, 0, 0)

  If retVal = 0 Then
   Debug.Print "File received."
  Else
   Debug.Print "Unable to download file."
  End If
End Sub

Stuart McLachlan wrote:

>On 19 Dec 2004 at 23:37, MartyConnelly wrote:
>
>  
>
>>' I am using latest Version of IE6
>>' should also work with IE5.0 MSXML ver 2.0,2.6, 3.0 etc
>>
>>    
>>
>
>And for the growing number of people like myself  who use Firefox and have 
>their firewall block IE from accessing the Internet? :-)
>
>  
>

-- 
Marty Connelly
Victoria, B.C.
Canada





More information about the AccessD mailing list