Function FTP Parameter Filename, FTPSite, Username, PassWord CRLF = Chr(13)+Chr(10) nFile = FCreate("ftp.txt") * Open connection to FTP Site and log in =FWrite(nFile, "open "+FTPSite+CRLF+Username+CRLF+Password+CRLF) * Force lowercase transmition =FWrite(nFile, "glob off"+CRLF) * Force ASCII transmition =FWrite(nFile, "ascii"+CRLF) * Force Binary transmition =FWrite(nFile, "binary"+CRLF) * If you want to get the file from the FTP Site =FWrite(nFile, "get "+Filename+CRLF) * If you want to put the file on the FTP Site =FWrite(nFile, "put "+Filename+CRLF) * End the connection and close FTP =FWrite(nFile, "quit"+CRLF) * Close the script file =FClose(nFile) * Change current drive in DOS cFTPCmd = sys(5) ! &cFTPCmd ! ftp -s:ftp.txt