Xailer & OZ Software

Hi
Does someone have an example of TFTP
I managed to get TInternet working.
I needed to test to make sure a web server was online and have done that.
I now need to test if an FTP server is online, accepting connections and
that I can login with a username and password.
Cheers
Nick

Nick,
> Does someone have an example of TFTP
Yes, here you have a little one:
WITH OBJECT TFtp():Create( Self )
:cUser := "user"
:cPassword := "pass"
//:nTransferType := FTP_TRANSFER_TYPE_BINARY
IF :Open()
IF ! :Connect( <server> )
MsgAlert( :GetErrorDescription() )
ELSE
MsgAlert( :GetCurrrentDirectory() )
ENDIF
:Close()
END WITH
Regards,
José Lalí­n

Nick,
> Does someone have an example of TFTP
Yes, here you have a little one:
WITH OBJECT TFtp():Create( Self )
:cUser := "user"
:cPassword := "pass"
//:nTransferType := FTP_TRANSFER_TYPE_BINARY
IF :Open()
IF ! :Connect( <server> )
MsgAlert( :GetErrorDescription() )
ELSE
MsgAlert( :GetCurrrentDirectory() )
ENDIF
:Close()
END WITH
Regards,
José Lalí­n

Interesting
No one wonder I couldn't get it to work...
Under the help for TFTP help there is no cUser or cPassword
There is no Open() or Connect()
Now I see it inherits TInternet...damn, wish I noticed that yesturday.....
Might be worth adding the example to the help for the next sucker plike
me...
Thanks for yoiur help
Nick
The help
"José Lalín" <notengo@correo.com> wrote in message
news:489181c2$[email=2@ozsrv2.ozlan.local...]2@ozsrv2.ozlan.local...[/email]
>
> Nick,
>
>> Does someone have an example of TFTP
>
> Yes, here you have a little one:
>
> WITH OBJECT TFtp():Create( Self )
> :cUser := "user"
> :cPassword := "pass"
> //:nTransferType := FTP_TRANSFER_TYPE_BINARY
>
> IF :Open()
> IF ! :Connect( <server> )
> MsgAlert( :GetErrorDescription() )
> ELSE
> MsgAlert( :GetCurrrentDirectory() )
> ENDIF
> :Close()
> END WITH
>
> Regards,
> José Lalín

Interesting
No one wonder I couldn't get it to work...
Under the help for TFTP help there is no cUser or cPassword
There is no Open() or Connect()
Now I see it inherits TInternet...damn, wish I noticed that yesturday.....
Might be worth adding the example to the help for the next sucker plike
me...
Thanks for yoiur help
Nick
The help
"José Lalín" <notengo@correo.com> wrote in message
news:489181c2$[email=2@ozsrv2.ozlan.local...]2@ozsrv2.ozlan.local...[/email]
>
> Nick,
>
>> Does someone have an example of TFTP
>
> Yes, here you have a little one:
>
> WITH OBJECT TFtp():Create( Self )
> :cUser := "user"
> :cPassword := "pass"
> //:nTransferType := FTP_TRANSFER_TYPE_BINARY
>
> IF :Open()
> IF ! :Connect( <server> )
> MsgAlert( :GetErrorDescription() )
> ELSE
> MsgAlert( :GetCurrrentDirectory() )
> ENDIF
> :Close()
> END WITH
>
> Regards,
> José Lalín

Nick,
in our blog there is an article with a component called TFTPFile which will
help to upload/download files from a FTP server.
Regards,
José Lalí­n

Nick,
in our blog there is an article with a component called TFTPFile which will
help to upload/download files from a FTP server.
Regards,
José Lalí­n