;; Robo-FTP Script File
;; Created by Script File Wizard on Wednesday, July 19, 2000 at 14:14:19
;;
;; Notes: 1. Script commands always in all CAPS (e.g., SENDFILE)
;;        2. Script labels are Capitalized (e.g., :Exit)
;;
;; Description: Download a file from ftp.robo-ftp.com
;;
;; Select the default folder containing files for this session
WORKINGDIR "C:\Program Files\Robo-FTP\"
:Top
;; Define the number of times to try the DIALNET command
LOOPCOUNT 1
:DialLoop
;; Connect to an FTP server using Dial-Up Networking
DIALNET "MyConnection" /timeout=60
;; If the connect is successful, continue script processing
;; from the Logon label
IFERROR= $ERROR_SUCCESS GOTO Logon
;; Tried DIALNET once...
LOOPTO DialLoop
;; Stop processing script and return to Robo-FTP user mode
STOP
:Logon
;; Define the number of times to try the FTPLOGON command
LOOPCOUNT 1
:LogonLoop
FTPLOGON "ftp.robo-ftp.com" /timeout=60
;; If the logon is successful, continue script from the Operation1 label
IFERROR= $ERROR_SUCCESS GOTO Operation1
;; Tried FTPLOGON once...
LOOPTO LogonLoop
;; Stop processing script and return to Robo-FTP user mode
STOP
:Operation1
;; Define the number of times to try the FTPCMD command
LOOPCOUNT 1
:CommandLoop1
;; Send a FTPcommand to the server
FTPCMD "CWD robo-ftp/outgoing"
;; Insert any additional commands here that may be necessary
;; to handle server
;; response(s) to the command
;; ...
;; If the FTP command is successful, continue script from the
;; Operation2 label
IFERROR= $ERROR_SUCCESS GOTO Operation2
;; Tried FTPCMD once...
LOOPTO CommandLoop1
;; continue script processing from the Disconnect label
GOTO Disconnect
:Operation2
;; Define the number of times to try the RCVFILE command
LOOPCOUNT 1
:FileLoop1
;; Retrieve a file from an FTP server
RCVFILE "xmtfile1" /timeout=60
;; If the receive file is successful, continue script from
;; the Disconnect label
IFERROR= $ERROR_SUCCESS GOTO Disconnect
;; Tried RCVFILE once...
LOOPTO FileLoop1
:Disconnect
;; Disconnect from FTP server
FTPLOGOFF
;; Hang-up the phone
DISCONNECT
:Exit
;; Exit from Robo-FTP
EXIT