找回密码
 加入
搜索
查看: 1887|回复: 4

[系统综合] DirRemove遇到的问题,求解

  [复制链接]
发表于 2011-6-28 19:08:15 | 显示全部楼层 |阅读模式
$a = DirRemove("E:\QQ",1)
If $a = 1 Then
      Run("E:\安装文件\QQ2010SP2.1.exe")
        

        Else
        MsgBox(4096, 'QQ', "文件删除失败,安装进度已经停止,请检查!")
Exit
EndIf   

这段代码当中,如果在E盘当中本身就存在名为QQ的文件夹,便可以正常运行,但有一种情况,如果在E盘当中,根本就没有这个文件夹,便提示文件删除失败,安装进度已经停止,请检查了,我想请问下,如何在删除成功和本身就没有这个文件夹的情况下,都运行 Run("E:\安装文件\QQ2010SP2.1.exe")
,而只有无法删除的情况才提示msgbox呢 ?
发表于 2011-6-28 19:28:46 | 显示全部楼层
$a = DirRemove("E:\QQ",1)
If $a<>1 Then MsgBox(4096, 'QQ', "文件删除失败,安装进度已经停止,请检查!点击确认按钮继续~")
Run("E:\安装文件\QQ2010SP2.1.exe")
发表于 2011-6-28 20:57:30 | 显示全部楼层
在dirmove前先判断下是否存在这个文件夹,如果没有就DirCreate一个,这样就不会出错了
发表于 2011-6-29 16:53:03 | 显示全部楼层

If DirRemove("E:\QQ",1) Or Not FileExists("E:\QQ") Then
      Run("E:\安装文件\QQ2010SP2.1.exe")
Else
        MsgBox(4096, 'QQ', "文件删除失败,安装进度已经停止,请检查!")
        Exit
EndIf   
发表于 2011-6-29 22:38:26 | 显示全部楼层
楼上正解!试试吧!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-15 01:39 , Processed in 0.079385 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表