写了一个程序:从ftp上下载一个应用程序,然后运行这个应用程序,然后退出程序。
出现的问题:无法运行这个应用程序。我用的方法有WinExec,ShellExecute,CreateProcess。
但是都不行,文件下载没问题,单步跟踪:下载完毕,还没有执行到WinExec时,
我就可以在本地看见该文件。而且我在执行WinExec前还fileExists判断了一下,
文件是可以找到的。在这个应用程序存在的前提下,不下载,单独执行winexec是
没问题的。
哪位大侠帮帮忙,真的是没办法了。
出现的问题:无法运行这个应用程序。我用的方法有WinExec,ShellExecute,CreateProcess。
但是都不行,文件下载没问题,单步跟踪:下载完毕,还没有执行到WinExec时,
我就可以在本地看见该文件。而且我在执行WinExec前还fileExists判断了一下,
文件是可以找到的。在这个应用程序存在的前提下,不下载,单独执行winexec是
没问题的。
哪位大侠帮帮忙,真的是没办法了。
解决方案 »
- 求:工具条图标,一个亮一个灰的那种,最好是bmp的,谢谢了~!
- delphi2007的帮助文档里没有介绍object pascal的语言的学习文档,请问哪里可以得到?
- 高分求一简单问题
- 怎么来控制数码相机进行拍摄?
- TMediaPlayer获取播放时间的问题
- 关于开发win2000下的服务程序的问题
- 求版主别删除!求职!工作地点:上海1. 程序员(Delphi ,ASP,ispLSI在系统编程,Visual Basic 6.0,C,C++)2.网络管理员 3.计算机相关
- 浮动面板怎么做?有没有代码?
- 请问大虾“回归测试”的概念是什么?请高人讲解。像“单元测试”,“集成测试”,“验收测试”等等的定义分别是什么,软件工程中那个阶段进行那种测试
- 我学了delphi一个多月了还只是会一点点特别是对函数属性。。了解的不多,为何delphi没有中文帮助问档(不是我ENGLISH差,而是实在不方便)有同感的请发言,也请老鸟们指点一二.
- 关于文本文件的疑问?
- 请大家帮帮我。
http://www.netyi.net/in.asp?id=ForMoreU
文件绝对下载完毕,单步跟踪到ftp下载完成,执行应用程序之前,我到本地文件夹下运行该应用程序没有问题。
文件是可以找到的。找到就應該執行,貼你代碼看看
idftp1.Get(ftppath+ftpfile,ExtractFilePath(Application.ExeName)+localfile,true);
idftp1.disconnect;
if fileExists(ExtractFilePath(Application.ExeName)+localfile) then
winexec(PCHAR(ExtractFilePath(Application.ExeName)+localfile)),SW_SHOW);
Application.Terminate;
idftp1.Username:= 'anonymous';
idftp1.Password:= '[email protected]';
idftp1.connect;
idftp1.Get('1.exe','e:\2.exe',true);
idftp1.disconnect;
winexec('e:\2.exe',SW_SHOW);
Application.Terminate;没问题啊?!
idftp1.connect;
idftp1.Get(ftppath+ftpfile,ExtractFilePath(Application.ExeName)+localfile,true);
idftp1.disconnect;
在这个语句之后加上sleep(5000)
让它停止5秒钟
然后再
if fileExists(ExtractFilePath(Application.ExeName)+localfile) then
winexec(PCHAR(ExtractFilePath(Application.ExeName)+localfile)),SW_SHOW);
Application.Terminate;
试试看!