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