求人改代码

lin6163

#NoTrayIcon
$ping = Ping("192.168.0.10",250)
if $ping >= 1 Then
        RunWait ("\\server\qz$\sa\Desk.exe")
        Else
Msgbox(0,"状态","发生错误，错误码为： " & @error)
EndIf
Sleep(5000)
$as = WinExists ( "Thief Soft(抓*软件)" )
if $as = 1 Then
        ProcessClose ( "Desk.exe" )
RunWait ("\\server\qz$\sa\Desk.exe")
EndIf

这样有错吗
为什么运行之后只执行
#NoTrayIcon
$ping = Ping("192.168.0.10",250)
if $ping >= 1 Then
        RunWait ("\\server\qz$\sa\Desk.exe")
        Else
Msgbox(0,"状态","发生错误，错误码为： " & @error)

后面那些为什么不起作用?


还有帮我改成如果ping 192.168.0.10
不通的时候5秒ping 一次
10次之后退出并提示错误

sxd

$ping = Ping("192.168.0.10")
If $ping = 0 Then
        For $i = 1 To 10
                $ping = Ping("192.168.0.10")
                If $ping > 0 Then ExitLoop
        Next
        If $i = 10 Then
                MsgBox(0, "状态", "发生错误，错误码为： " & @error)
        EndIf
EndIf

没测试...

liongodmien

RunWait()要等程序运行完才会继续执行下面的代码

lin6163

原帖由 liongodmien 于 2008-12-28 16:57 发表
RunWait()要等程序运行完才会继续执行下面的代码

那有什么方法能调用并运行\\server\qz$\sa\Desk.exe不出提示
我试了run
有提示

liongodmien

除了ＲＵＮ，还有ＲＵＮＡＳ等．．．