NCPath="\Program Files\NetVision\NetChanger\NetchangerNetv.exe"
NCWind="無線LAN接続切替ツール"
UKTWind="UKTenki"
# 既に無線LAN接続ツールが動いていたら止める
If(WndExists(NCWind))
Close(NCWind)
Sleep(10000)
EndIf
# 無線LAN接続ツールを起動する。自動的に無線LANがONになる。
#(自動接続で繋がるAPがある事が前提)
Run(NCPath,"-h")
Sleep(40000)
# UKTenki(等)を起動する。
Run("\Program Files\UKTenki\UKTenki.exe")
Sleep(20000)
# UKTenki(等)を停止する
If(WndExists(UKTWind))
Close(UKTWind)
EndIf
Sleep(1000)
# 無線LAN接続ツールを停止する。自動的に無線LANがOFFになる。
If(WndExists(NCWind))
Close(NCWind)
EndIf
|