pauzn 发表于 2010-6-8 09:56:27

定时结束并重启某程序,自动允许一个实例

我的外网接入是光纤拨号,每天5:00路由自动重启来保证网络正常
    内网运行一台WEB服务器,利用花生壳来发送外网IP
      问题就是每天重启路由导致IP更换后,花生壳就不能把新获取的IP解析到域名上
    于是就自己写个脚本来把花生壳自动结束掉然后再重新打开。
    实现的功能就是每天的5:30结束花生壳,清除掉任务栏残留图标,然后重新启动花生壳,加了判断只运行一个脚本实例的代码。
    第一次发帖,望指正批评!#include <systray UDF.au3>
;防止程序重复运行

$version = @ScriptName

If WinExists($version) Then

      MsgBox(16, "错误", "请不要重复运行本程序!"& @CR & @CR & "关于本程序如有问题请联系作者。"& @CR & @CR & "手机:1585XXXXXXX"& @CR & @CR &"QQ:271666161")

      Exit

EndIf

AutoItWinSetTitle($version)

While 8
Switch @HOUR&@MIN&@SEC
        Case 053000
$PID1 = ProcessExists("PhDDNS.exe")
$PID2 = ProcessExists("PhDdnsCore.exe")
If $PID1 Or $PID2 Then
ProcessClose("PhDDNS.exe")
ProcessClose("PhDdnsCore.exe")
_SysTrayIcon_Clean("PhDDNS.exe")
Else
Sleep(5000)
ProcessWaitClose($PID1 Or $PID2)
Run("C:\Program Files\Oray\PhDDNS\PhDDNS.exe")
EndIf
EndSwitch
WEnd

qinguofang 发表于 2010-6-8 16:53:26

这个支持你呀 呵呵 我也需要这个呢

shinco1 发表于 2012-9-28 12:10:09

支持一下。。。。。。

wangxiaolinlin 发表于 2012-10-18 11:34:22

恩恩,还是看着代码舒服。
页: [1]
查看完整版本: 定时结束并重启某程序,自动允许一个实例