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

[Captain SHOK]

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

[Sergey.Bikov71380]

А с этого момента можно поподробней плиз!

[ayn]

Убрал в скрипте слова"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 происходит соединение и все работает. Как сделать так, что бы прошел повтор скрипта?

[Captain SHOK]

Видимо, нужно ставить задержку.
Попробуй так:

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 секунд.

[Captain SHOK]

А с этого момента можно поподробней плиз!

Нужно с помощью программы 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")

[ayn]

Изменил скрипт написав следующим образом
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 , то все запускается.

[ayn]

Вот скрипт полностью:
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
Не могу понять почему не работает при автозапуске

[ayn]

Cail помогите по настройке скрипта дравер прописывается, а хобдрайв не запускается. Может быть причиной расположение хобдрайва на карте sdmmc, т.к. не хватает места на ResidentFlash? Может есть какойнибудь другой скрипт? Для магнитол с несохраняемым реестром?

[cail]

А хобдрайв точно лежит в указанном в скрипте месте?
Если вручную запускать - запускается?

[ayn]

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

[Captain SHOK]

как я понимаю скрипт запускается снова и зависает.

Если причина в повторном запуске скрипта, то добавь в самое начало скрипта:
1. Для полной версии

Код: Выделить всё

If(WndExists("hobDrive"))
   Show("hobDrive")
   Exit
EndIf

2. Для демо

Код: Выделить всё

If(WndExists("/hobd"))
   Show("/hobd")
   Exit
EndIf

[ayn]

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

[ayn]

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)

[Captain SHOK]

Спасибо за помощь 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)

Строки, где спереди стоит знак # не нужны, т.к. все равно не выполняются в вашем случае.

[ayn]

Пробывал исправленый скрипт при запуске пишет: If without Endif

[Captain SHOK]

Вы этот скрипт отдельно запускаете или встраиваете в другой? Такая ошибка возникает, если не баланс 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)

[ayn]

If(WndExists("/hobd")), наклон палки / перед hobd правильный? Вопрос по встраиваню скрипта не понял, добавляю в FAR к своему.

[Captain SHOK]

Что за FAR?

[ayn]

Программа FAR Manager наследует двухоконную идеологию, стандартную расцветку и систему команд (управление с клавиатуры) у известного файлового менеджера Norton Commander.

[Captain SHOK]

А разве под wince есть far manager? Может total commander?
С исправленным скриптом тоже ошибка выскакивает?

добавляю в FAR к своему.

Вот тут не понял. К чему добавляете? К своему скрипту? Если да, то каким образом?