|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [Архив - Часть 1.3] AutoIt скрипты |
|
[Архив - Часть 1.3] AutoIt скрипты
|
Старожил Сообщения: 250 |
Профиль | Отправить PM | Цитировать
Внимание! Тема переведена в архивное состояние (настоятельно рекомендуется к прочтению/поиску) Руководство к действию по работе c AutoIt. Помогите пожалуйста. Нужен маленький скриптик для решения некоторых рутинных задачь. Вот что нужно сделать последовательно: 1) в папке DIR1 находим и удаляем файлы в названии которых присутствует text_1 2) в папке DIR2 находим xxx.sif и удаляем строки, в которых присутствует text_1 3) в папке DIR3 находим xxx.inf и добавляем в его секцию [XXX] несколько строчкек (text_2, text_3, ..., text_n) 4) в папке DIR4 находим yyy.inf ищем в его секции [YYY] text_4 и заменяем его на text_5 5) сохраняем все изменения и выводим отчёт о проделанной работе :-) Заранее благодарен. |
|
Отправлено: 05:05, 03-12-2006 |
Ищу Человека… Сообщения: 420
|
Профиль | Сайт | Отправить PM | Цитировать desperate
Цитата:
|
|
------- Отправлено: 17:43, 11-12-2006 | #41 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Старожил Сообщения: 250
|
Профиль | Отправить PM | Цитировать amel27
Огромное спасибище! Всё работает! |
Отправлено: 10:59, 12-12-2006 | #42 |
Новый участник Сообщения: 10
|
Профиль | Отправить PM | Цитировать Извините пожалуйста, а существует ли такая команда с помощью которой можно было бы закрыть определенное окно!
Например я сделал так что при открытии моего диска(autorun)он сначало записывает мой шрифт в директорию %windir%\Fonts и Я сделал так поместил explorer.exe в директорию диска и написал в cmd файле %CDROM%\Autoplay\explorer.exe %windir%\Fonts Это мне нужно чтобы он открывался А как сделать так чтобы она вслед за этим закрывалась автоматически Пожалуйста напишите мне |
Отправлено: 09:09, 14-12-2006 | #43 |
Старожил Сообщения: 282
|
Профиль | Отправить PM | Цитировать А можно ли средствами AutoIT (навеоняка можно, только придумать не
могу как) удалить файл с фиксированным именем во всех неопределенных деррикториях - имена, количество, уровни которых заранее неизвестны? Допустим имеем файл который надо удалить - 1.txt Имеем каталог в котором его надо удалять - 2 И вот в этом то каталоге может быть любое количество каталогов, подкаталогов, подподкаталогов - какие - не понятно, имена их - не известно, количество - то же, уровней вложения - тем более. Мозг опухают - в хелпе пока ничего не смог отыскать. |
Отправлено: 18:00, 14-12-2006 | #44 |
Must AutoIt Сообщения: 3054
|
Профиль | Сайт | Отправить PM | Цитировать amel27
Цитата:
Есть вопрос - а можно чтобы вместо (как опция) прикрепления гуи, можно было также прикреплять любое другое окно (по его заголовку)? P.S При разукрашивании скрипта, если поставить Send("{...}") то скрипт ругается на неопознанные стили, а точнее, это если только есть кривые круглые ораньжевые скобки Heaven Цитата:
Цитата:
DenchikK Цитата:
#include <File.au3> #include <Array.au3> $Path = @ScriptDir & "\2" $FileName = "1.txt" $DirsList = _DirListToArray ($Path) For $i = 1 to $DirsList[0] FileDelete($DirsList[$i] & "\" & $FileName) Next FileDelete($Path & "\" & $FileName) Func _DirListToArray ($sPath) Local $i, $j, $rlist[1]=[0], $blist, $alist=_FileListToArray ($sPath, '*', 2) If IsArray ($alist) Then For $i=1 To $alist [0] _ArrayAdd ($rlist, $sPath & "\" & $alist [$i]) $blist = _DirListToArray ($sPath & "\" & $alist [$i]) If $blist[0]>0 Then For $j=1 To $blist [0] _ArrayAdd ($rlist, $blist [$j]) Next EndIf Next EndIf $rlist [0] = UBound ($rlist) - 1 Return $rlist EndFunc |
||||
Отправлено: 20:59, 14-12-2006 | #45 |
Старожил Сообщения: 282
|
Профиль | Отправить PM | Цитировать Creat0R
Извините пожалуйста за глупый вопрос - скопировал скрипт в файл au3, переписал в тот каталог откуда запускаю - 2 файла include. Запускаю - а мне выдается ошибка - Error: Unknown function name. на строчке Local $i, $j, $rlist[1]=[0], $blist, $alist=_FileListToArray ($sPath, '*', 2) |
Отправлено: 04:15, 16-12-2006 | #46 |
Googler Сообщения: 3665
|
Профиль | Отправить PM | Цитировать DenchikK
проверь наличие в заголовке скрипта строчек: Creat0R Цитата:
Цитата:
|
||
Отправлено: 11:01, 16-12-2006 | #47 |
Старожил Сообщения: 282
|
Профиль | Отправить PM | Цитировать amel27
Есть эти строчки - один в один все как указано у Creat0R |
Отправлено: 11:41, 16-12-2006 | #48 |
Googler Сообщения: 3665
|
Профиль | Отправить PM | Цитировать DenchikK
Цитата:
|
|
Отправлено: 12:11, 16-12-2006 | #49 |
Старожил Сообщения: 282
|
Профиль | Отправить PM | Цитировать Цитата:
Цитата:
Добавлено: Нашел в скрипте Sanja Alone функцию _FileListToArray и поместил её в файл \Include\Array.au3 (ибо этой функции ни в одно файле каталога \Include не было), вот код: Func _FileListToArray($sPath, $sFilter = "*", $iFlag = 0) Local $hSearch, $sFile, $asFileList[1] If Not FileExists($sPath) Then SetError(1) Return "" EndIf If (StringInStr($sFilter, "\")) or (StringInStr($sFilter, "/")) or (StringInStr($sFilter, ":")) or (StringInStr($sFilter, ">")) or (StringInStr($sFilter, "<")) or (StringInStr($sFilter, "|")) or (StringStripWS($sFilter, 8) = "") Then SetError(2) Return 0 EndIf If Not ($iFlag = 0 Or $iFlag = 1 Or $iFlag = 2) Then SetError(3) Return "" EndIf $asFileList[0] = 0 $hSearch = FileFindFirstFile($sPath & "\" & $sFilter) If $hSearch = -1 Then SetError(0) Return 0 EndIf While 1 $sFile = FileFindNextFile($hSearch) If @error Then ExitLoop If $iFlag = 1 Then If StringInStr(FileGetAttrib($sPath & "\" & $sFile), "D") <> 0 Then ContinueLoop EndIf If $iFlag = 2 Then If StringInStr(FileGetAttrib($sPath & "\" & $sFile), "D") = 0 Then ContinueLoop EndIf ReDim $asFileList[UBound($asFileList) + 1] $asFileList[0] = $asFileList[0] + 1 $asFileList[UBound($asFileList) - 1] = $sFile WEnd FileClose($hSearch) SetError(0) If $asFileList[0] = 0 Then Return "" Return $asFileList EndFunc ;==>_FileListToArray Local $i, $j, $rlist[1]=[0], $blist, $alist=_FileListToArray ($sPath, '*', 2) Local $i, $j, $rlist[1] ERROR Error: No virriable given for "Dim", "Local", "Global" or "Const" statement. |
||
Последний раз редактировалось DenchikK, 17-12-2006 в 05:41. Отправлено: 03:44, 17-12-2006 | #50 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Открывая 7z архив пишет не удаётся открыть как архив. Можно ли его восстановить? | DreDo | Хочу все знать | 4 | 01-12-2009 18:54 | |
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:. | Vadikan | AutoIt | 1543 | 18-01-2009 10:46 | |
[архив - Часть 2] AutoIt скрипты | Vadikan | AutoIt | 985 | 21-01-2008 09:58 | |
[Архив - Часть 1.2] AutoIt скрипты | Dirk Diggler | AutoIt | 505 | 02-12-2006 11:00 | |
[Архив - Часть 1.1] AutoIt скрипты | EgOrus | AutoIt | 335 | 04-02-2006 16:58 |
|