- 论坛徽章:
- 0
|
假设FTP脚本存放路径为:
NAME = OUTFTP
LIB = JANCE
FILE = SPFEPOD
脚本内容如下:
jance pass
bin
quote site namefmt 1
cd qsys.lib/jance.lib
put epodbak/&savfname
其中&savfname是10位长的参数,那么可在400上写个C程序,假设程序名为CRTFTPTXT,简要代码如下:
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
main(int argc,char **argv)
{
char savfname??(11??);
char fname??(255??);
FILE *fp;
memset(savfname,0,sizeof(savfname));
strncpy(savfname,argv??(1??),10);
memset(fname,0,sizeof(fname));
sprintf(fname,"JANCE/SPFEPOD(OUTFTP)");
if ( ( fp=fopen(fname,"w+") ) == NULL ) {
printf("creat ftptxt error");
exit(127);
}
fprintf(fp,"jance pass??/n");
fprintf(fp,"bin??/n");
fprintf(fp,"quote site namefmt 1 ??/n");
fprintf(fp,"cd qsys.lib/jance.lib ??/n");
fprintf(fp,"put epodbak/%s??/n",savfname);
fprintf(fp,"quit");
}
CLP调用前,先将原OUTFTP删去,再CALL CRTFTPTXT PARM(&savfname)
[ 本帖最后由 胖有型 于 2006-8-7 11:39 编辑 ] |
|