simple ftp question (newbie)

[steel]

Why does the folowing code not connect. (heeh besides the fake ip address, of course I put a real IP in there) but it will not connect to any ftp site. I was trying on mine, any other ftp client will. It won't even conect the varialbe is never populatd. any ideas





Private Sub Command1_Click()

Dim tstr As Variant

tstr = Inet1.OpenURL("ftp://9.9.9.9")

Text1.Text = tstr

End Sub

Ok here's something that you may have missed, set the protocol to icFtp or you can just add the code in the function and make it look like this for example:


Private Sub Form_Load()
Dim tstr As Variant
Inet1.Protocol = icFTP
tstr = Inet1.OpenURL("ftp://ftp.cdrom.com")
Text1.Text = tstr
End Sub

and that should work, try it, I did it and it worked and gave me the message on how many users are on the server out of how many and blah blah blah...
HOpe that helps...

[steel]

Thanks that was the problem. All of the ftp sites I connected to have been an anonymous connection. How can I include a username and password.
Thanks again

Within the inet1 control you can specify username and password...

forexample:

Inet1.UserName = "Blah"
Inet1.Password = "BlahPass"


I hope that helps...