home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1999 April / CD_Shareware_Magazine_31.iso / WIN95 / INTERNET / ftpctrl3b8.exe / %MAINDIR% / Scripts / Example16.ftp < prev    next >
Encoding:
Text File  |  1999-02-07  |  1.0 KB  |  48 lines
  1. ; *****************************************************
  2. ; Example16.ftp
  3. ; =============
  4. ; This example shows how to use the RESUME-SEND command
  5. ; in combinaton with "if success.." and "Goto <Label>".
  6. ; ---
  7. ; This example would make the Script try and resume a
  8. ; file transfer until successful.
  9. ; -----------------------------------------------------
  10. ; NOTE: This is just a sample - for your information ;o)
  11. ; *****************************************************
  12.  
  13. ; ******* First provide the Login information...
  14.  
  15. Host="ftp.yourhost.net"
  16. Port="21"
  17. User="your.username"
  18. Password=" INK-n:┤LLJN-? "
  19.  
  20. ; ******* Timeout in seconds...
  21. Timeout=120
  22.  
  23. ; *******  ...and then connect to FTP host...
  24. connect
  25.  
  26. ; *******  Command sequence...
  27.  
  28. binary 
  29.  
  30. remote-cd  "/myfiles"
  31.  
  32. SEND "c:\myfiles\myfile.dat" "myfile.dat"
  33. if Success then
  34.    Goto "Done"
  35. endif
  36.  
  37. :Resume
  38. RESUME-SEND "c:\myfiles\myfile.dat" "myfile.dat"
  39. if Success then
  40.    Goto "Done"
  41. endif
  42. Goto "Resume"
  43.  
  44.  
  45. :Done
  46. ; Now disconnect from FTP server...
  47. Disconnect
  48.