Помощь по установке на магнитолу, драйвера, автозагрузка

Установка, работа, проблемы хобдрайва в Windows CE/Mobile: GPS Навигаторы, Магнитолы, Телефоны и смартфоны.

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Captain SHOK » 07 окт 2014, 20:12

Дело в иероглифах, так как скрипт проверяет название окна "Unidentified USB Device". Если в названии окна иероглифы, то скрипт не сработает.
Вообще данный скрипт неудобный. К чему эти нажимания? Надо писать другой скрипт, импортирующий данные в реестр при загрузке магнитолы.
Аватара пользователя
Местный
 
Сообщения: 95
Зарегистрирован: 02 сен 2014, 00:28

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Sergey.Bikov71380 » 08 окт 2014, 02:22

А с этого момента можно поподробней плиз!
Аватара пользователя
Новичок
 
Сообщения: 4
Зарегистрирован: 18 сен 2014, 18:10

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 08 окт 2014, 12:34

Убрал в скрипте слова"Unidentified.... Device" получилось
Title = "USB"
DriverPath = "\ResidentFlash\usbseralg.dll
#DriverPath = "\NandFlash\ftdi_ser.dll"

While ( TRUE )

If ( WndExists(Title) )

SendKeys(Title, DriverPath)
SendOK(Title)
Exit

EndIf

Sleep(1000)

EndWhile
скрипт запускается, прописывается путь драйвера, но окно не исчезает, если второй раз нажимаю кнопку "навигация", то все исполняется, драйвер прописывается, окно уходит при запуске Hobdrive происходит соединение и все работает. Как сделать так, что бы прошел повтор скрипта?
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Captain SHOK » 08 окт 2014, 23:16

Видимо, нужно ставить задержку.
Попробуй так:
Title = "USB"
DriverPath = "\ResidentFlash\usbseralg.dll
While ( TRUE )
If ( WndExists(Title) )
SendKeys(Title, DriverPath)
Sleep(1000)
SendOK(Title)
Exit
EndIf
Sleep(1000)
EndWhile

Если не пройдет, попробуй увеличить задержку до 2-3 секунд.
Аватара пользователя
Местный
 
Сообщения: 95
Зарегистрирован: 02 сен 2014, 00:28

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Captain SHOK » 08 окт 2014, 23:45

Sergey.Bikov71380 писал(а):А с этого момента можно поподробней плиз!

Нужно с помощью программы RegEdit для winCE, после установки драйвера, сделать экспорт ветки реестра, куда прописался драйвер. У меня нету проводного ELM, поэтому не подскажу в какую ветку он прописывается. Нужно спросить на форуме, либо найти самостоятельно.
После экспорта, созданный файл переименовать, например, в USB_driver.reg, положить его в папку с программой и поставить в автозагрузку такой скрипт:
reg_key = "Software\USBDrv" - ветка реестра (будет другое название)
reg_file = folder\"USB_driver.reg"
Runwait ( folder\"taskmgr.exe", reg_file & " /silent")

Здесь импорт реестра идет через программу taskmgr, если она не работает, то можно попробовать через программу Params:
reg_key = "Software\USBDrv" - ветка реестра (будет другое название)
reg_file = folder \ "storage\USB_driver.reg"
RunWait ( folder \ "Params.exe", "-w ""-path:" & reg_file & """ -reg:"&reg_key&" -read")
Вложения
Пример скрипта и программы.rar
Пример скрипта и программы
(344.1 КБ) Скачиваний: 831
Аватара пользователя
Местный
 
Сообщения: 95
Зарегистрирован: 02 сен 2014, 00:28

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 09 окт 2014, 14:56

Изменил скрипт написав следующим образом
Title = "USB"
DriverPath = "\ResidentFlash\usbseralg.dll
While ( TRUE )
If ( WndExists(Title) )
SendKeys(Title,DriverPath)
SendOK(Title)
SendKeys(Title, DriverPath)
SendOK(Title)
Exit
EndIf
Sleep(1000)
EndWhileм
Стал запускаться, но если запускать черезAutoRunHobdrive , то не запускается. Если запустить через тотал командер, AutoRunHobdrive , то все запускается.
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 09 окт 2014, 15:25

Вот скрипт полностью:
AutoRunHodbrive
aedpath = "\sdmmc\AutoEnterDriver.exe"

hdpath = "\sdmmc\hobdrive\hobdrive.exe"

#navipath = "\sdmmc\navi.exe"

### Optional
# Copy("\ResidentFlash\usbseralg.dll", "\Windows\")

Run(aedpath)

Run(hdpath)

#Run(navipath)

Title = "USB"
DriverPath = "\ResidentFlash\usbseralg.dll
#DriverPath = "\NandFlash\ftdi_ser.dll"

While ( TRUE )

If ( WndExists(Title) )

SendKeys(Title, DriverPath)
SendOK(Title)
Exit

EndIf

Sleep(1000)

EndWhile
Не могу понять почему не работает при автозапуске
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 12 окт 2014, 10:02

Cail помогите по настройке скрипта дравер прописывается, а хобдрайв не запускается. Может быть причиной расположение хобдрайва на карте sdmmc, т.к. не хватает места на ResidentFlash? Может есть какойнибудь другой скрипт? Для магнитол с несохраняемым реестром?
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

cail » 13 окт 2014, 15:27

А хобдрайв точно лежит в указанном в скрипте месте?
Если вручную запускать - запускается?
HobDrive(свежак) + Android4 rk3188 2din + Elm327USB + Pontiac Vibe 2003
Не пишите пожалуйста вопросы в личку. Создавайте тему в соответствующем форуме.
Аватара пользователя
Администратор
 
Имя: Игорь
Сообщения: 4310
Зарегистрирован: 06 дек 2011, 15:49
Откуда: Нижний Новгород

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 13 окт 2014, 16:51

Да Ваша программа работает хорошо. Попробую описать работу скрипта: елм подсоединен сразу,при включении гу появляется окно с запросом драйвера, прописывается путь \ResidentFlash\usbseralg.dll, если в этот момент нажать "ок",то запускается hobdrive, соединение с авто начинает работать. В дальнейшем, что бы перейти в оболочку ГУ приходится нажать кнопку "Navi" , но в дальнейшем вернуться в ходрайв уже не возможно, при нажатии кнопки как я понимаю скрипт запускается снова и зависает.
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Captain SHOK » 13 окт 2014, 19:32

ayn писал(а): как я понимаю скрипт запускается снова и зависает.

Если причина в повторном запуске скрипта, то добавь в самое начало скрипта:
1. Для полной версии
Код: Выделить всё
If(WndExists("hobDrive"))
   Show("hobDrive")
   Exit
EndIf

2. Для демо
Код: Выделить всё
If(WndExists("/hobd"))
   Show("/hobd")
   Exit
EndIf
Аватара пользователя
Местный
 
Сообщения: 95
Зарегистрирован: 02 сен 2014, 00:28

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 14 окт 2014, 04:28

Спасибо за помощь Captain SHOK , но что то я уже путаться начинаю, если можно покажите по наглядней
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 14 окт 2014, 05:01

AutoRunHodbrive
aedpath = "\sdmmc\AutoEnterDriver.exe"

hdpath = "\sdmmc\hobdrive\hobdrive.exe"

#navipath = "\sdmmc\navi.exe"

### Optional
# Copy("\ResidentFlash\usbseralg.dll", "\Windows\")

Run(aedpath)

Run(hdpath)

#Run(navipath)
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Captain SHOK » 14 окт 2014, 14:12

ayn писал(а):Спасибо за помощь Captain SHOK , но что то я уже путаться начинаю, если можно покажите по наглядней

Как-то так должно быть. Универсально и для демо и для полной версии:
Код: Выделить всё
If(WndExists("hobDrive"))
   Show("hobDrive")
   Exit
ElseIf(WndExists("/hobd"))
   Show("/hobd")
   Exit
EndIf
AutoRunHodbrive
aedpath = "\sdmmc\AutoEnterDriver.exe"
hdpath = "\sdmmc\hobdrive\hobdrive.exe"
Run(aedpath)
Run(hdpath)

Строки, где спереди стоит знак # не нужны, т.к. все равно не выполняются в вашем случае.
Аватара пользователя
Местный
 
Сообщения: 95
Зарегистрирован: 02 сен 2014, 00:28

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 16 окт 2014, 14:07

Пробывал исправленый скрипт при запуске пишет: If without Endif
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Captain SHOK » 16 окт 2014, 14:30

Вы этот скрипт отдельно запускаете или встраиваете в другой? Такая ошибка возникает, если не баланс If и EndIf.
Можно так попробовать:
Код: Выделить всё
If(WndExists("hobDrive"))
   Show("hobDrive")
   Exit
EndIf
If(WndExists("/hobd"))
   Show("/hobd")
   Exit
EndIf
AutoRunHodbrive
aedpath = "\sdmmc\AutoEnterDriver.exe"
hdpath = "\sdmmc\hobdrive\hobdrive.exe"
Run(aedpath)
Run(hdpath)
Аватара пользователя
Местный
 
Сообщения: 95
Зарегистрирован: 02 сен 2014, 00:28

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 16 окт 2014, 17:54

If(WndExists("/hobd")), наклон палки / перед hobd правильный? Вопрос по встраиваню скрипта не понял, добавляю в FAR к своему.
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Captain SHOK » 16 окт 2014, 18:35

Что за FAR?
Аватара пользователя
Местный
 
Сообщения: 95
Зарегистрирован: 02 сен 2014, 00:28

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

ayn » 17 окт 2014, 01:36

Программа FAR Manager наследует двухоконную идеологию, стандартную расцветку и систему команд (управление с клавиатуры) у известного файлового менеджера Norton Commander.
Начинающий
 
Сообщения: 47
Зарегистрирован: 14 авг 2014, 10:46

Re: Помощь по установке на магнитолу, драйвера, автозагрузка

Captain SHOK » 17 окт 2014, 03:02

А разве под wince есть far manager? Может total commander?
С исправленным скриптом тоже ошибка выскакивает?
ayn писал(а):добавляю в FAR к своему.

Вот тут не понял. К чему добавляете? К своему скрипту? Если да, то каким образом?
Аватара пользователя
Местный
 
Сообщения: 95
Зарегистрирован: 02 сен 2014, 00:28

Пред.След.

Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 13