delphi调用cmd执行一连串指令问题
我要调用cmd,先创建一个目录,然后登陆ftp,下载一个文件
下面的代码不行,我每一个命令用/c隔开
WinExec(PChar('cmd /c mkdir C:\wat /c ftp 100.10.15.109 /c cmm /c qawsx /c cd /WRV/LG /c ASCII /c lcd C:/wat /c get TOG /c'),1);
var
F:TextFile;
begin
AssignFile(F,'doself.bat');
Rewrite(F); {F为TextFile类型}
WriteLn(F,....);
//这里把你要执行的DOS命令一行行用WriteLn写好
WriteLn(F,'del %0'); //删除自己doself.bat
CloseFile(F);
WinExec('doself.bat',SW_HIDE);
end;