[ags]

Help!

Как АвтоИтом послать программе установки нажатие клавиши "+" на NumPade. Конструкция Send ("{+}") не работает. Там вообщето меню раскрывающееся (такое же как при выборе компонентов Office). Оно внутри окна и по-отдельности пункты не активизируются, только все меню целиком. Остается два способа: по координатам мышом (но ИМХО не надежно, вдруг на другом компе координаты не совпадут...) и стрелками, но чтобы попасть в подменю нужен этот "+". Иначе слишком много ненужного барахла установится


Сорри, не могу удалить... Сработала стрелка вправо (как я эту клавишу упустил из виду, ума не приложу...) Еще раз сорри за пустой пост...

[AlikPan]

Sanja Alone

2. Создание новой системной переменной new строкового типа: Код: $newsysvarname = 'new' $newsysvartype='REG_SZ' $newsysvarvalue='value' $cur = RegRead ( "HKEY_LOCAL_MACHINE\SYSTEM\Select", "Current" ) $smcur = 'HKEY_LOCAL_MACHINE\SYSTEM\ControlSet00' & $cur & '\Control\Session Manager\Environment' RegWrite ( $smcur, $newsysvarname, $newsysvartype, $newsysvarvalue )

пожалуй это именно то, что нужно, СПАСИБО

IfEqual,AUsername,L4305,Run,WinSet LOG_ST=F32,,hide Если AUsername=L4305, тогда запустить некую утилиту WinSet с параметрами LOG_ST=F32 в скрытом окне (функции WinSet в автоите нет). К чему это?

Всё правильно, нет такой функции. Но есть сторонняя утилита WinSet.exe (кажется от MIcrosoft), которую
я и вызываю. Устаналивает переменные SET в среде WINDOWS

2 bogomolv - огромное спасибо за информацию!!!
Буду думать

[Sanja Alone]

1. Добавил скрипт для Teleport Pro 1.38

2. Исправил ошибку в конвертере crta - неправильно импортировались в реестр параметры типа REG_DWORD (значения интерпретировались как десятичные). Кавычки заменил на дописывание к значению префикса "0x" - теперь все правильно (значения считаются шестнадцатиричными).

Эта ошибка также касается следующих скриптов:
7-Zip
Agnitum Outpost
DivX 5
DivX 6
DVDIdle
GordianKnot
ImageDupeless
ISOBuster
O&O Defrag
Pragma

Если кто-то скачал - извините. Можете скачать еще раз или исправить вручную. Я сам случайно заметил данную недоработку, т.к. большинство DWORD параметров были или 0 или 1, а эти цифры одинаковы во всех системах счисления.

[DenchikK]

fox_sly
Практически так же сделано и у меня, только бы я Вам посоветовал заменить Send на ControlSetText - так оно и лучше и надёжнее будет.

Как то вот так:

Код:

Run("rundll32.exe netshell.dll,StartNCW")
WinWaitActive ('Мастер новых подключений','Мастер новых подключений')
Send('{Enter}')
Sleep ('500')
WinWaitActive ('Мастер новых подключений','Подключить к Интернету для просмотра веб-узлов и чтения  электронной почты.')
ControlClick ('Мастер новых подключений','Подключить к Интернету для просмотра веб-узлов и чтения  электронной почты.','Button1')
Sleep ('500')
Send('{Enter}')

WinWaitActive ('Мастер новых подключений','Каким образом подключиться к Интернету')
ControlClick ('Мастер новых подключений','Каким образом подключиться к Интернету','Button2')
Sleep ('500')
Send('{Enter}')
WinWaitActive ('Мастер новых подключений','Данное подключение использует модем и обычную телефонную линию или телефонную линию ISDN.')
ControlClick ('Мастер новых подключений','Данное подключение использует модем и обычную телефонную линию или телефонную линию ISDN.','Button1')
Sleep ('500')
Send('{Enter}')
WinWaitActive ('Мастер новых подключений','Им&я поставщика услуг')
ControlSetText ( 'Мастер новых подключений', '', 'Edit1', 'Peterstar' )
Sleep ('500')
Send('{Enter}')
WinWaitActive ('Мастер новых подключений','Номер &телефона:')
ControlSetText ( 'Мастер новых подключений', '', 'Edit1', '3203370,,,' )
Sleep ('500')
Send('{Enter}')
WinWaitActive ('Мастер новых подключений','&Имя пользователя:')
sleep (100) 
ControlSetText ( 'Мастер новых подключений', '', 'Edit1', 'Login')
sleep (100)
ControlSetText ( 'Мастер новых подключений', '', 'Edit2', 'Password')
Send('{tab}')
sleep (100)
ControlSetText ( 'Мастер новых подключений', '', 'Edit3', 'Password')
Sleep ('500')
ControlCommand ( 'Мастер новых подключений', '', 'Button13', 'Check', '' )
ControlCommand ( 'Мастер новых подключений', '', 'Button2', 'Check', '' )
Sleep ('500')
Send('{Enter}')
WinWaitActive ('Мастер новых подключений','Завершение работы мастера новых подключений')
ControlCommand ( 'Мастер новых подключений', '', 'Button20', 'UnCheck', '' )
Send('{Enter}')
Exit

[fox_sly]

to DenchikK
С заменой согласен, просто как писал выше это была одна из первых попыток написать скрипт для соединения,
насколько я помню там была другая проблема, что не удалось в свое время уйти от Send('{Enter}'),
по крайней мере у меня строка типа

Код:

WinWaitActive ('Мастер новых подключений','Мастер новых подключений')
Send('{Enter}')

срабатывала, а вот замена через ControlClick

Код:

WinWaitActive ('Мастер новых подключений','Мастер новых подключений')
ControlClick  ('Мастер новых подключений','Мастер новых подключений','Button3')

не работала, окно вообще закрывалось

[CTEPBA]

Люди обэясните пожалуйста почему когда с ставлю Alcohol 120% при помощи какого сктрипта:

Код:

AutoItSetOption("TrayIconHide", 1)
If @OSType="WIN32_NT" Then BlockInput ( 1 )
AutoItSetOption ( "SendKeyDelay", 10 )
Global $file='setup.exe', $patchfile='patch_3105.exe', $alcoholdir=@ProgramFilesDir & '\Alcohol Soft\Alcohol 120\'
;запуск установки в тихом режиме
Run( $file & ' /qn REBOOT=Suppress' )
ProcessWait ( "rundll32.exe" )
ProcessClose ("rundll32.exe")
Sleep ( 50 )
If FileExists ( $alcoholdir & '\Alcohol.exe' )=1 Then
       FileCopy ( @ScriptDir & '\' & $patchfile, $alcoholdir & $patchfile, 1 )
       FileChangeDir ( $alcoholdir )
       Run ( $alcoholdir & $patchfile, $alcoholdir )
       WinWait ( 'Patch','Alcohol 120% v1.9.5.3105 Retail')
       WinActivate ( 'Patch' )
       ControlClick ( 'Patch', '', 'Button1' )
       Sleep ( 4000 )
       WinClose ( 'Patch', 'Alcohol 120% v1.9.5.3105 Retail' )
       WinWaitClose ( 'Patch','Alcohol 120% v1.9.5.3105 Retail' )
EndIf
;н-рые настройки
RegWrite('HKEY_CURRENT_USER\Software\Alcohol Soft\Alcohol 120%\Options\Display',"AutostartWhenWindowsStartup","REG_SZ",'0')
RegWrite('HKEY_CURRENT_USER\Software\Alcohol Soft\Alcohol 120%\Options\Display',"ExecuteInFullScreen","REG_SZ",'0')
RegWrite('HKEY_CURRENT_USER\Software\Alcohol Soft\Alcohol 120%\Options\Display',"ListPhysicalDevicesFirst","REG_SZ",'0')
RegWrite('HKEY_CURRENT_USER\Software\Alcohol Soft\Alcohol 120%\Options\General',"AutoCheckCurrentVersionViaInternetAtStart","REG_SZ",'0')
RegWrite('HKEY_CURRENT_USER\Software\Alcohol Soft\Alcohol 120%\Options\Virtual drive',"MountImageTo1stDeviceOnDblClickingImageFile","REG_SZ",'1')
RegWrite('HKEY_CURRENT_USER\Software\Alcohol Soft\Alcohol 120%\Options\Recording',"OverBurnDisc","REG_SZ",'1')

У меня закрывается WPI, а установка Alcohol продолжается?

[DenchikK]

CTEPBA
Рискну предположить причину:

Алкоголь ставиться примерно так:
msiexec /qn /quiet /i setup.msi DRIVER0=a347bus DRIVER1=a347scsi INSTALLDIR="%programfiles%\Alcohol Soft\" /norestart

Потому то и не ставиться у тебя он.

Вот мой пример. Поправь его под себя:

Код:

prog[pn]=['Alcohol 120% 1.9.5.3105']
desc[pn]=['Эмулятор Лазерных Дисков <i>Установка Ключами</i>']
ordr[pn]=[4]
cmd1[pn]=['msiexec /qn /quiet /i %cdrom%\\Software\\Programs\\Alcohol\\setup.msi DRIVER0=a347bus DRIVER1=a347scsi INSTALLDIR="%programfiles%\\Alcohol Soft\\" /norestart']
cmd2[pn]=['%cdrom%\\Software\\Programs\\Alcohol\\crack.exe']
rdflt[pn]=['yes']
cat[pn]=['Programs']
picf[pn]=['alcohol.png']
picw[pn]=['270']
pich[pn]=['162']
pn++

содержание файла crack.exe (это sfx rar архив, распаковывающийся в каталог, куда уже поставился Алкоголь):

crack.exe
patch.exe
alcohol.reg

После распаковки запускается скрипт autoit такого содержания:

Код:

Run('patch.exe')

WinWaitActive ('Patch','Alcohol 120')
ControlClick ('Patch','Alcohol 120','Button1')

WinWait ('Patch','Alcohol 120')
Sleep(5000)
ControlClick ('Patch','Alcohol 120','Button3')

Exit

а файл alcohol.reg остался от старых версий, на всякий случай:

Код:

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Alcohol Soft\Alcohol 120%\Info]
"UserName"="Denchik"
"Company"="Babylon 5"
"SerialNo"="ALCBCBCBCBC3T99TVJKK2G7XYBCVWDDB2MPCDR78YCDB2CCB289RTK234CD7MG7D43TC3M392C34V89T8DFJKBBT8MPMPQ6T8BB233HCDXXCCBCBCB"

[CTEPBA]

Проблема не в том что он не ставиться все, а вот что когда очередь доходит до него в WPI, то почемуто WPI закрывается а Alcohol продолжает установку и все приложения которые стояли после Alcohol не ставяться так, как уже выгруженно WPI.

[Sanja Alone]

CTEPBA

У меня закрывается WPI, а установка Alcohol продолжается?

Ну это наверно из-за ProcessClose ("rundll32.exe"). Логично? А воткнул ты это закрытие процесса в мой скрипт скорее всего по причине появления окна "мастер нового оборудования"?... Вот только закрывая rundll32.exe, ты, одновременно с выскочившим окном, закрываешь и окно установки прог, запускаемых из RunOnceEx (этот метод используется в WPI) через тот же самый rundll32. Твоя проблема решаема, а как - было сказано немного выше.


DenchikK

Алкоголь ставиться примерно так:

Это если через msi, а я делал через exe.