[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:.

[TERMINAL]

Народ ! Помогите плз с проблемкой.
Как можно отключить сетевую карту @IPAddress1 и потом включить:?

trash1, тут уже нужно использовать переключение языка на руский, вот тебе примерчик
Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
WinWait("Текстовый документ - Блокнот","")
If Not WinActive("Текстовый документ - Блокнот","") Then WinActivate("Текстовый документ - Блокнот","")
WinWaitActive("Текстовый документ - Блокнот","")
Send("ajnj")
Создаёшь текстовый документ с именем Текстовый документ, открываешь и запускаешь вышеуказанный скриптик...
Если у тебя по умолчанию будет английский язык стоять, то напечатается слово ajnj, а если же русский-напечатается слово фото.

[Maza Faka]

trash1
Смотри последний вопрос-ответ в FAQ-е (http://oszone.net/display.php?id=3663)

[OneGo]

Добрый день, подскажите пожалуйста как сделать так, чтобы данный скрипт работал в неактивном окне. Т.е. при сворачивании в трей он продолжал там работать.

WinWaitActive("Program")

HotKeySet("{ESC}", "Quit")

sleep(5000)

While 1
Send("z")
Send("x")
Send("{UP}")
Opt("SendKeyDownDelay", 100)
Send("{UP}")

WEnd

Func Quit()
Exit
Endfunc

[Maza Faka]

OneGo
Если я правильно понял: используй функцию ControlSend().

[morgan1991]

Здравствуйте! Скажите ктонибудь плиз как в Auoit можно зделать следующее:
Есть текстовый документ в котором есть куча цифр два и три, как заменить все цифры два на цифру пять? Чёт не могу понять как. И ещё странно почемуто нельзя открыть текстовый файл одновременно для чтения и записи. Помогите.....

[Maza Faka]

morgan1991
Попробуй так:
$Read = FileRead("c:\test.txt")

$Result = StringReplace($Read, "2", "5")

$hFile = FileOpen("c:\test.txt", 2)

FileWrite($hFile, $Result)

FileClose($hFile)

[morgan1991]

Maza Faka, Спс понял. Помогли.

[TERMINAL]

Возможно ли отследить когда процесс закончит обрабатываться процессором (загрузка проца до 98%) и как только он успакоится (загрузка проца этим процессом = 0 % ) то вывести на экран сообщение к примеру, при условии что этот процесс должен всё время работать:команда ProcessWaitClose не подойдёт !?

[Maza Faka]

TERMINAL
Как узнать процент использования процессора определённым процессом.

Способ 1 (Средствами WMI):
$strComputer = "."
$objWMIService = ObjGet("winmgmts:{impersonationLevel=impersonate}!\\" & $strComputer & "\root\cimv2")

$StartTime = _GetProcTime("mplayerc.exe")
Sleep(1000)
$EndTime = _GetProcTime("mplayerc.exe")

$total = Int(($EndTime - $StartTime) / 100000)

MsgBox(0, "CPU usage", "mplayerc.exe used " & $total & "%")

Func _GetProcTime($sProcName)
If Not ProcessExists($sProcName) Then Return SetError(1, 0, 0)

Local $colProcesses, $objProcess, $sngProcessTime

$colProcesses = $objWMIService.ExecQuery("Select * from Win32_Process Where name = '" & $sProcName & "'")

For $objProcess in $colProcesses
$sngProcessTime = ($objProcess.KernelModeTime + $objProcess.UserModeTime)
Next

Return $sngProcessTime
EndFunc

Способ 2 (Средствами WinAPI) (http://www.autoitscript.com/forum/index.php?showtopic=72689&view=findpost&p=530775)

[morgan1991]

Скажите ктонить, а как мне установить пароль на декомпиляцию скрипта у меня нет поля для ввода пароля и командой Aut2exe.exe /in <infile.au3> [/out <outfile.exe>] [/icon <iconfile.ico>] [/nodecompile] [/comp 0-4] [/pass <passphrase>]
не компилируется версия autoit 3.2.8.1?

И ещё какой командой перезагружается компьютер?

[Maza Faka]

morgan1991
Декомпиляция поддерживается начиная с версии 3.2.5.1 и раньше, соответственно параметр [/pass <passphrase>] также актуален только для вышеуказанных версий.

какой командой перезагружается компьютер?

Shutdown(2 + 4)

[morgan1991]

спс а получается в версии 3.2.8.1 нет декомпиляции совсем? или только пароль нельзя ставить? А как просто включить возможность декомпиляции?

[Maza Faka]

получается в версии 3.2.8.1 нет декомпиляции совсем? »
Нет совсем.

[morgan1991]

спс эх.....

[morgan1991]

Сори последний вопрос:
Когда я вставляю такой код в скрипт:
Global $input0 = FileSelectFolder("Выберите путь установки:", "*")
ShellExecute($input0 & "\xxx.exe")
Send($input0 & "\ccccxxxx")
И если допустим $input0 будет равно M:\программы\
То команда Send($input0 & "\ccccxxxx") введёт в поле ввода вот это:
M:\Ïðîãè\ccccxxxx
Как это исправить помогите плиз? Надо срочно.

[Maza Faka]

morgan1991
Используй функцию ControlSetText()

[morgan1991]

спс всё норм. И откуда вы всё знаете..?!?...))

[TimAlex]

Вопрос таков:
имеется кнопка в ПО, при наведении мыши на ёё появляется дополнительный текст(типа подсказки) так вот, как можно считать этот текс. Просто в нем есть изменяющейся параметр который мне очень нужен.

[Maza Faka]

morgan1991
И откуда вы всё знаете..?
Справка, форум, практика.

[morgan1991]

Вот ещё вопросик нагрянул:
Как удалить в трее когда нажимаешь на значёк скрипта меню Script Paused?