save file to ftp site (A2000 SR-1)

Topic

New Reply

Is it possible to save a file to a ftp site? I am using the transfertext method together with an export specification. I can successfully save the file to my hard drive on my local machine, but I need to save it to a ftp site. I have the ftp site added with the username and password, but when I specifiy that site, it tells me I have an invalid internet address.

Reply | Quote

Replies

A search for ftp in this forum turns up several threads, perhaps the ones starting at post 260430 or post 393164 will help.

Reply | Quote

Thanks Hans for those threads–I did find some code I think I can use (code as follows).

Public Function Uploadtest()
Dim FTP As Inet
Set FTP = New Inet
With FTP
.Protocol = icFTP
.RemoteHost = “???.??.??.???”
.UserName = “kropf”
.Password = “#####”
.Execute .url, “Send C:kropf.txt”
Do While .StillExecuting
DoEvents
Loop
Uploadtest = (.ResponseCode = 0)
End With
Set FTP = Nothing
End Function

The MSINET.OCX wasn’t on my system, but I downloaded it and registered it with regsvr32. Then I could add the reference Microsoft Internet Transfer Control 6.0 (SP4). The code compiles okay now, but when I try to run it, I get this error, Runtime error 429 ActiveX component can’t create object. When I click on debug, it highlights the line, Set FTP = New Inet. What am I doing wrong?

Reply | Quote

I’m sorry, I don’t know anything about MSINET.OCX.

Reply | Quote

I’m sorry, I don’t know anything about MSINET.OCX.

Reply | Quote

Discussion has been continued in another thread in post 395430. To avoid confusion and duplication, this thread is locked. All reactions in the other thread, please. Thank you.

Reply | Quote

Discussion has been continued in another thread in post 395430. To avoid confusion and duplication, this thread is locked. All reactions in the other thread, please. Thank you.

Reply | Quote

Thanks Hans for those threads–I did find some code I think I can use (code as follows).

Public Function Uploadtest()
Dim FTP As Inet
Set FTP = New Inet
With FTP
.Protocol = icFTP
.RemoteHost = “???.??.??.???”
.UserName = “kropf”
.Password = “#####”
.Execute .url, “Send C:kropf.txt”
Do While .StillExecuting
DoEvents
Loop
Uploadtest = (.ResponseCode = 0)
End With
Set FTP = Nothing
End Function

The MSINET.OCX wasn’t on my system, but I downloaded it and registered it with regsvr32. Then I could add the reference Microsoft Internet Transfer Control 6.0 (SP4). The code compiles okay now, but when I try to run it, I get this error, Runtime error 429 ActiveX component can’t create object. When I click on debug, it highlights the line, Set FTP = New Inet. What am I doing wrong?

Reply | Quote

A search for ftp in this forum turns up several threads, perhaps the ones starting at post 260430 or post 393164 will help.

Reply | Quote