FtpUser[1] := 13; // Global var. text
FtpPw[1] := 13; // Global var. text
//Create FTP Script
FtpScript.CREATE('D:\script.txt');
FtpScript.TEXTMODE(TRUE);
FtpScript.WRITE(FtpUser); //Variables with USERID
FtpScript.WRITE(FtpPw); //Variable with FTP PW
FtpScript.WRITE('binary');
FtpScript.WRITE('Put d:\test.txt 172.16.155.143'); // Print test.txt to a IP address from a printer
FtpScript.WRITE('quit');
FtpScript.CLOSE;
//Exec FTP Transfer
SHELL('ftp','-s:D:\script.txt','172.16.155.143');
//Clear Folder
//Clear Script because readable password!!
IF EXISTS('D:\script.txt') THEN
FILE.ERASE('D:\script.txt');
Maybe someone else needs it
MaikelJ
ps. This message should be in the Financials forum, sorry :oops:
Comments
http://www.mibuso.com/forum/viewtopic.php?t=797
Maybe someone else needs it
MaikelJ
ps. This message should be in the Financials forum, sorry :oops:
Thanks anyway Luc.