[Архив - Часть 1.1] AutoIt скрипты

[CTEPBA]

Sanja Alone
И этот твик не помог?



Код:

[HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\DriverSearching]

"DontSearchWindowsUpdate"=dword:00000001

"DontPromptForWindowsUpdate"=dword:00000001

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

[Sanja Alone]

CTEPBA
но если ставить Alcohol автоматом уже в полностью загруженной системе все ставиться и ничего не выскакиваетНу дак в этом и весь смысл данного твика - применить его на стадии установки Виндов. У меня, например, приведенный твик вносится в реестр из RegTweaks.reg через cmdlines.txt.

[selanec555]

- так как довольно часто встречаются нестандартные ситуации при установке популярных программ
Неужно на АвтоИт можно описать ВСЕ нестандартные ситуации? Или как? Для каждого сетапника все описывать?
Я к тому что есть решение гораздо удобнее. А решать каждому.

[CTEPBA]

Sanja Alone
У меня он тоже от туда вноситься, но ничего не пашет.

[AlikPan]

Интересная ситуация, может кто сталкивался ?
Кусочек скрипта для регистрации в сети (домен 2000):
...
$AUserName=@UserName
MsgBox(4096, "Имя пользователя (Login)", $AUserName)
...
Работает в WIN2000, WIN XP. Под WIN 98 ни в какую.
после регистрации то же срабатывает везде.
Ограничения WIN98 или глюка ?

[Sanja Alone]

AlikPan
Ограничения WIN98 или глюка ?Первое. Под 9x-Окнами у АвтоИта вообще куча ограничений.

[AlikPan]

Sanja Alone
Спасибо.
А через реестр брать Login - это нормально ?

[DenchikK]

Проблема с последним окном в русификаторе для FastStone 2.28
http://www.4ru.info/FastStone.htm
Окно нафиг не определяется со всеми вытекающими...
Но вот что интересно - я забыл однажды снять из трея застопорившийся скрипт, и запустил его снова - окно видимо определилось, скрипт сработал.
Замучился уже, кучу вариантов перепробовал - не хочет работать!

[Sanja Alone]

AlikPan
А через реестр брать Login - это нормально ?А какая разница? :)

DenchikK
кучу вариантов перепробовалЧерез идентификаторы пробовал? (если нет - см. пример здесь (http://sanjaalone.h15.ru/files/autoit-winamp.zip)).

[EgOrus]

DenchikK
а вариант с простым копированием FSViewer.ru в папку программы, не нравится?

[DenchikK]

EgOrus
Так то оно так, но просто хочется понять, как заставить работать инсталяху. Спортивная злость, как говорится.

Sanja Alone
Видать что-то я не так делаю - не получается.

[a_s_malyshev]

Подскажите. А можно ли как-нибудь получить список всех имен компьютеров с Dns- суффиксом (например: inf1.scool.ru) в анном домене с помощью AutoIt или же какой-нибудь другой программой например выгрузить в файл. Очень нужно

[Sanja Alone]

Добавил скрипты
AutoGordianKnot 2.20 (http://sanjaalone.h15.ru/files/autoit-autogk.zip)
FastStone Image Viewer 2.2x (http://sanjaalone.h15.ru/files/autoit-fsiv.zip) (Image Viewer + русификатор + Screen Capture + Photo Resizer)


DenchikK
Проблема с последним окном в русификаторе для FastStoneДа вроде все нормально... :search:


a_s_malyshev
как-нибудь получить список всех имен компьютеров
Может вот это подойдет:
NET VIEW - эта команда выводит список доступных для совместного использования ресурсов данного компьютера.
Kогда используется без параметров, отображает список компьютеров текущего домена или сети.

[a_s_malyshev]

Может вот это подойдет:
NET VIEW - эта команда выводит список доступных для совместного использования ресурсов данного компьютера
Команда хорошая, но мне нужно полные имена компьютеров.
Т.е. test.scool.r36.ru <- Что то вроде этого.
Они должны выдаваться из системы.
А не так чтобы я получил список с помощью команды net View а потом добавлял к элементам списка хвосты (scool.r36.ru).
Если какая-нибудь такая команда?

[ghosty]

Здравствуйте. Спасибо, что вы есть :)
Прошу помочь написать простенький (по-видимому) скриптик.

Имеется выделенный текст. При нажатии определенного сочетания кнопок этот текст необходимо сохранить в виде отдельного *.txt файла с названием
- либо соответствующим первым трем словам первой строки текста;
- либо просто порядковым номером (только как в этом случае отследить, какой порядковый номер в папке явл-ся последним)
в определенную папку.

Очень надеюсь на вашу помощь.

[selanec555]

Здравствуйте. Каким образом можно отловить AutoIt'ом перезагрузку ПК, у меня есть пара скриптов установки софта, дак вот так есть такие дистрибутивы котоые сами перезагрузают комп :( как это отловить/недопустить/корректно обработать? Спасибо.

[Sanja Alone]

ghosty
Имеется выделенный текст. При нажатии определенного сочетания кнопок этот текст необходимо сохранить в виде отдельного *.txt файла
Ну, можно вот так, например:
;предотвращение возможности множественного запуска скрипта
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)

;устанавливаем хоткей (в данном сл. это Ctrl+Alt+Z; выбор за тобой)
HotKeySet("^!z", "SaveToFile")

;определение каталога для сохранения файлов
Global $DestinationDir = "c:\working folder"
;запуск основного бесконечного цикла
While 1
Wend

Func SaveToFile()
;заносим выделенный текст в буфер обмена
Send ('^c')
;режим записи: 1 - дописывание данных; 2 - перезапись файла
$mode = 1
;имя файла (в данном сл. будет иметь вид ГодМесяцДень-ЧасыМинутыСекунды.txt, например 20051211-053438.txt)
$Destination = $DestinationDir & '\' & @YEAR & @MON & @MDAY & '-' & @HOUR & @MIN & @SEC & '.txt'
;если каталог назначения не существует - создаем его
If Not FileExists($DestinationDir) Then DirCreate($DestinationDir)
;берем данные из буфера обмена
$Data = ClipGet()
;запись данных в файл (совмещена с проверкой и выводом сообщения в сл. неудачи)
If WriteArrayToFile($Destination, $Data, $mode)<>1 Then MsgBox(16,'Error','Unable to write data to destination file',8)
EndFunc

;функция записи массива в файл
Func WriteArrayToFile($sFilePath, $Array, $writemode)
Local $hOpenFile
Local $hWriteFile

$hOpenFile = FileOpen($sFilePath, $writemode)

If $hOpenFile = -1 Then
SetError(1)
Return 0
EndIf

$hWriteFile = FileWrite($hOpenFile, $Array)

If $hWriteFile = -1 Then
SetError(2)
Return 0
EndIf

FileClose($hOpenFile)
Return 1
EndFunc
- либо соответствующим первым трем словам первой строки текста;
- либо просто порядковым номеромМожно и так, и так, но это сложнее и неудобнее.


selanec555
как это отловить/недопустить/корректно обработать?
MultiSet тут явно не поможет :) Нужно писать скрипты для этих приложений и обрабатывать данную ситуацию - либо ключами тихой установки с отменой перезагрузки, либо установкой клацаньем по окнам с отрицательным ответом на вопрос о перезагрузке.

[Sanja Alone]

Добавил скрипты
Anti-Blaxx 1.18 (http://sanjaalone.h15.ru/files/autoit-antiblaxx.zip)
DAEMON Tools 4.00HE (http://sanjaalone.h15.ru/files/autoit-dt.zip)

[kovdaev]

Помогите написать скрипт нужно
вызвать "Свойства панели задач и меню пуск"
проверить стоят ли галочки в определенных местах если нет то установить галочки
затем закрыть окно.
Заранее спасибо.

[Sanja Alone]

kovdaev
Помогите написать скрипт
Лови:
;заголовок окна
Global $Title = 'Свойства'
;вызов окна 'Свойства панели задач и меню "Пуск"'
Run ('RunDll32.exe shell32.dll,Options_RunDLL 1')
;дожидаемся появления окна и активизируем его
WinWait ($Title)
WinActivate ($Title)
WinWaitActive ($Title)


;Далее идет непосредственно установка/снятие чекбоксов (измени/допиши то, что именно тебе нужно)

;Закрепить панель задач (поставить галку)
If ControlCommand ($Title,'','Button1','IsChecked','')=0 Then ControlCommand ($Title,'','Button1','Check','')
;Автоматически скрывать панель задач (снять галку)
If ControlCommand ($Title,'','Button2','IsChecked','')=1 Then ControlCommand ($Title,'','Button2','UnCheck','')
;...и т.д.

;Скрывать неиспользуемые значки (поставить галку)
If ControlCommand ($Title,'','Button7','IsChecked','')=0 Then ControlCommand ($Title,'','Button7','Check','')

;Закрыть окно (нажать кнопку "OK")
ControlClick ($Title,'','Button11')