Вообщем, нашел свою проблему ухода в сон и далее гибернацию.
Раньше как то и не думал что всему этому может быть причиной,
OBDmain, .Описывать не буду долгие мои мучения.
ExecTBL...дает нам большие возможности.
Закрытие OBDmain перед сном реализовал через него.
Начало кода.
Цитата:
"ONSUSPEND","CloseWindow;AutoCommServ||ByVar;vc_au toload_is;<<{CloseWindow;iCarVoiceCommander}||
|
То есть команда на закрытие OBDmain перед уходом в сон
CloseWindow;AutoCommServ
Позже прочитал ,что так же была реализация у
dmn37.
Все получилось, уход в сон без проблем. Но на рисовалась, другая проблема. Не стало подключения к ОБД или к телефону. Испробовал все варианты,
сдесь предложенные
Но не один у меня не заработал.
Вот, пока такой тестирую такой код, может и грубый, и не красивый. НО РАБОТАЕТ.
1_запуском первого блютус
Код:
#NoTrayIcon
#RequireAdmin
#pragma compile(Icon, "C:\Program Files (x86)\AutoIt3\Icons\MyAutoIt3_Yellow.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<Process.au3>
If @OSArch = "X86" Then
$ProgramFileDir = "C:\Program Files"
Else
$ProgramFileDir = "C:\Program Files (x86)"
endif
; Перезапуск BlueSoleilCS
Run('taskkill /f /im BtTray.exe',"", @SW_HIDE)
Run('taskkill /f /im BlueSoleilCS.exe',"", @SW_HIDE)
Run('taskkill /f /im BsHelpCS.exe',"", @SW_HIDE)
Run('taskkill /f /im BsMobileCS.exe',"", @SW_HIDE)
Sleep(3000)
ShellExecute($ProgramFileDir & "\IVT Corporation\BlueSoleil\BtTray.exe")
If ($cmdline[0] > 0) Then Sleep($cmdline[1])
Sleep(4000)
If (NOT ProcessExists("OBDmain.exe")) Then ShellExecute("OBDmain.exe")
.
2_запуском первого ОБД
Код:
#NoTrayIcon
#RequireAdmin
#pragma compile(Icon, "C:\Program Files (x86)\AutoIt3\Icons\MyAutoIt3_Yellow.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<Process.au3>
If @OSArch = "X86" Then
$ProgramFileDir = "C:\Program Files"
Else
$ProgramFileDir = "C:\Program Files (x86)"
endif
If ($cmdline[0] > 0) Then Sleep($cmdline[1])
Sleep(5000)
If (NOT ProcessExists("OBDmain.exe")) Then ShellExecute("OBDmain.exe")
; Перезапуск BlueSoleilCS
Run('taskkill /f /im BtTray.exe',"", @SW_HIDE)
Run('taskkill /f /im BlueSoleilCS.exe',"", @SW_HIDE)
Run('taskkill /f /im BsHelpCS.exe',"", @SW_HIDE)
Run('taskkill /f /im BsMobileCS.exe',"", @SW_HIDE)
Sleep(3000)
ShellExecute($ProgramFileDir & "\IVT Corporation\BlueSoleil\BtTray.exe")
Пока тестирую, первый запускаеться ОБД.
Проблем не наблюдаю.
Запуск скрипта реализован , так же через
ExecTBL, Это записано в конце команды
||RUN;$skinpath$OBD_ELM\OBDmain10_Loader.exe
Цитата:
/- Команды выполняемые при выходе из спящего режима
"OnONRESUMETimer","EndTimer;ONRESUME||BYVAR;vc_aut oload_is;<<{Run;$skinpath$Plugins\iCarVoiceCommand er................................................ .................................................. .................................................. ............RESUME;{OnAutoResume1Timer}<<MyApp35If Open||RUN;$skinpath$OBD_ELM\OBDmain10_Loader.exe"
|
Тестирую, пока все работает.