zzm0163 发表于 2011-6-28 19:08:15

DirRemove遇到的问题，求解

$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呢 ？

daiyu116 发表于 2011-6-28 19:28:46

$a = DirRemove("E:\QQ",1)
If $a<>1 Then MsgBox(4096, 'QQ', "文件删除失败,安装进度已经停止,请检查！点击确认按钮继续~")
Run("E:\安装文件\QQ2010SP2.1.exe")

papapa314 发表于 2011-6-28 20:57:30

在dirmove前先判断下是否存在这个文件夹，如果没有就DirCreate一个，这样就不会出错了

www378660084 发表于 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   

hzxymkb 发表于 2011-6-29 22:38:26

楼上正解！试试吧！
页: [1]
查看完整版本: DirRemove遇到的问题，求解