вот, что получилось в итоге.. использую код от LEXX09...
изредка (когда время сна до 30 мин) вылазит ошибка по икару..
все автозагрузки, которые были, убрал.. теперь стоит один скрипт, в котором все программы, нужные мне для работы... gpsgate, Bluestacks, iCarDS
Вот код:
Код:
#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 $PBT_APMSUSPEND = 0x0004
Global $PBT_APMRESUMESUSPEND = 0x0007
$hGUI = GUICreate("Restart", 100, 100, 1, 1)
GUIRegisterMsg($WM_POWERBROADCAST, "Standby")
; Запускаем GpsGate
ShellExecute("C:\Program Files (x86)\Franson\GpsGate 2.0\GpsGateXP.exe")
; Запускаем iCarDS
ShellExecute("C:\Program Files (x86)\TipTop software\iCar DS\iCarDS.exe")
; Запускаем Bluestacks вместе с лаунчером MyLauncher
$Bluestacks_path = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Bluestacks", "InstallDir")
ShellExecute($Bluestacks_path & "HD-RunApp.exe", "-p ru.znalexey.mylauncher -a ru.znalexey.mylauncher.LauncherActivity")
; Запускаем программу по коннекту интернета (У кого нет такой программы, тогда эту и следующие строки удалить!)
; ShellExecute("C:\Program Files (x86)\SP Dialer\SP Dialer.exe")
While 1
Sleep(100)
WEnd
Func Standby($hWnd, $Msg, $wParam, $lParam)
Select
; Вход в спящий режим
Case $wParam = $PBT_APMSUSPEND
Suspend()
; Выход из спящего режима
Case $wParam = $PBT_APMRESUMESUSPEND
ResumeSuspend()
Case Else
EndSelect
EndFunc
; Вход в спящий режим
Func Suspend()
; Закрываем iCarDS
WinClose("iCar DS")
; Закрываем программу по коннекту интернета
; WinClose("SP Dialer.exe")
; Закрываем GpsGate
WinClose("Franson GpsGate")
;Закрываем Блюстак
WinClose("HD-Agent")
EndFunc
; Выход из спящего режима
Func ResumeSuspend()
; Запускаем GpsGate
ShellExecute("C:\Program Files (x86)\Franson\GpsGate 2.0\GpsGateXP.exe")
; Запускаем программу по коннекту интернета
; ShellExecute("C:\Program Files (x86)\SP Dialer\SP Dialer.exe")
; Запускаем Bluestacks вместе с лаунчером MyLauncher
$Bluestacks_path = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Bluestacks", "InstallDir")
ShellExecute($Bluestacks_path & "HD-RunApp.exe", "-p ru.znalexey.mylauncher -a ru.znalexey.mylauncher.LauncherActivity")
; Запускаем iCarDS
ShellExecute("C:\Program Files (x86)\TipTop software\iCar DS\iCarDS.exe")
EndFunc
Вопросы к знатокам...
1. вот здесь использую
Код:
;Закрываем Блюстак
WinClose("HD-Agent")
я хочу закрыть блюстак полностью, так по крайней мере gpsбридж запускается и подхватывает данные с gpsgate...
какой exe-шник использовать для полного закрытия блюстака?
спасибо..
2. Если сюда
Код:
; Закрываем iCarDS
WinClose("iCar DS")
добавить
Код:
; Закрываем iCarDS
WinClose("iCar DS")
Sleep(2000)
поможет это решить проблему с ошибкой ? Если код можно использовать, то задержку буду подбирать ..
ПС. LEXX09 там по контролю состояния
gpsgate есть сдвижка? (у тебя я так понимаю сборка вин 7)...