Что то никто не отвечает... видать что то застопорилось..
LEXX09 посмотри, пожалуйста, этот код.. будет работать? Или что-нибудь добавить нужно?
Замысел в том, чтобы перед сном GPSGATE, икар, программа-звонилка для интернета закрывались, а после пробуждения, в том числе длительного трех и более часов запускались
Код:
#pragma compile(Icon, "C:\Program Files (x86)\AutoIt3\Icons\au3script_v9.ico")
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseUpx=y
#AutoIt3Wrapper_Run_AU3Check=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <WindowsConstants.au3>
#include <GUIConstants.au3>
#include <MsgBoxConstants.au3>
Global $bLogging = true
Global $sLogFile = @ScriptDir & '\' & @ScriptName & '.log'
Global $PBT_APMRESUMESUSPEND = 0x0007
$hGUI = GUICreate("Restart", 100, 100, 1, 1)
GUIRegisterMsg($WM_POWERBROADCAST, "Standby")
; Запускаем iCarDS
If (@OSArch = "X64") Then
$iCarDS_path = "C:\Program Files (x86)\TipTop software\iCar DS\"
Else
$iCarDS_path = "C:\Program Files\TipTop software\iCar DS\"
EndIf
ShellExecute($iCarDS_path & "iCarDS.exe")
While 1
Sleep(100)
WEnd
Func Standby($hWnd, $Msg, $wParam, $lParam)
; Если выход из спящего режима, то...
If ($wParam = $PBT_APMRESUMESUSPEND) Then
Restart()
EndIf
EndFunc
Func Restart()
; Закрываем GpsGate, если запущен
If ProcessExists("GpsGateXP.exe") Then
ProcessClose("GpsGateXP.exe")
EndIf
; Закрываем iCarDS, если запущен
If ProcessExists("iCarDS.exe") Then
ProcessClose("iCarDS.exe")
EndIf
; Закрываем ПРОГРАММУ по коннекту инернета, если запущен
If ProcessExists("SP Dialer.exe") Then
ProcessClose("SP Dialer.exe.exe")
EndIf
Sleep(50)
; Запускаем GpsGate ЗДЕСЬ ПАРАМЕТР НИЖЕ ЛУЧШЕ УКАЗЫВАТЬ КАК ПУТЬ К ФАЙЛУ
$GpsGate_path = "C:\Program Files (x86)\Franson\GpsGate 2.0\"
ShellExecute($GpsGate_path & "GpsGateXP.exe")
Sleep(50)
; Запускаем iCarDS
If (@OSArch = "X64") Then
$iCarDS_path = "C:\Program Files (x86)\TipTop software\iCar DS\"
Else
$iCarDS_path = "C:\Program Files\TipTop software\iCar DS\"
EndIf
ShellExecute($iCarDS_path & "iCarDS.exe")
; Запускаем ПРОГРАММУ по коннекту инернета
$GpsGate_path = "C:\Program Files (x86)\SP Dialer\"
ShellExecute($GpsGate_path & "SP Dialer.exe")
EndFunc