ocean123
asked on
call a AS/400 CL within a VB
I would like my VB program to execute an AS/400 CL. The user will click on a command button that will call this CL. This CL will copy a file to another file using CPYF. Our legency system is on AS/400.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
thanks for the help; I used ODBC for my connection
1) Create a file ftpfile.ftp:
open 10.1.1.1
USERNAME
PASSWORD
quote rcmd CALL PGM(MyLib/MyCLProgram)
Enter the correct IP address of you AS400 instead of 10.1.1.1 and a valid user name and password. MyLib is the AS400 library and MyCLProgram the name of the CL program to run.
2) Create a batch file that calls the ftp file above:
ftp -s:C:\ftpfile.ftp
Enter the correct path your your ftp file.
3) Call the above batch file from your VB program using a Shell command.
There may a nicer solution but I used this one before and it works.