![]() |
Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета. Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме. С уважением, ваш призрачный админ, BigMac... |
|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Чтение из фаила txt |
|
[решено] Чтение из фаила txt
|
Новый участник Сообщения: 34 |
Подскажите пожалуйста, возможно ли реализовать такую вещь, написал скрипт:
Хотелось бы что бы скрипт брал данные ID из отдельного текстовика т.е. в send ("17251") цифру 17251 надо было не прописывать в скипт каждый раз, а забивать в текстовик столбиком, например: 1.txt то он эти данные воспримет как send ("17251"), send ("21111") и Send ("2323"). И второй вопрос, можно ли так же добавить что бы скрипт сам считал колличество стлобцов в txt и вбивал эти данные в цикл? Извиняюсь за небольшой сумбур, если в вопросе что то непонятно, напишите что именно и я попробую перефразировать. |
|
Отправлено: 17:18, 08-05-2014 |
Старожил Сообщения: 168
|
Профиль | Отправить PM | Цитировать Что-нибудь вроде такого
;Читаем файл $txt = FileRead(@ScriptDir & "\1.txt") ; Проверяем конец строки - DOS/Unix/Mac Select Case StringInStr($txt, @CRLF) > 0 $sDelimiter = @CRLF Case StringInStr($txt, @LF) > 0 $sDelimiter = @LF Case Else $sDelimiter = @CR EndSelect ; Помещаем строки в массив (если файл без заморочек ;создавался в блокноте Windows, то, вероятно, можно ;сразу заменить $sDelimiter на @CRLF и убрать Select...EndSelect выше) $aLines = StringSplit($txt, $sDelimiter, 1) For $i = 1 To $aLines[0] Send($aLines[$i]) Send("{TAB 2}") Next Или должно быть ? Ни разу не пользовался функцией Send ![]() |
------- Последний раз редактировалось oz84, 09-05-2014 в 06:11. Отправлено: 05:45, 09-05-2014 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Новый участник Сообщения: 34
|
Профиль | Отправить PM | Цитировать Спасибо большое за подробное разъяснение и пример. Вроде все понятно, отмечать пока о готовности не буду, щас попробую внедрить в свой скрипт и отпишусь/отмечусь.
|
Отправлено: 10:23, 12-05-2014 | #3 |
Новый участник Сообщения: 34
|
Профиль | Отправить PM | Цитировать Все работает великолепно, еще раз спасибо.
Извиняюсь, за доп вопрос, а не подскажете как можно это все заключить в цикл, что бы цикл был равен количеству столбцов в фаиле 1.txt? |
Отправлено: 15:20, 12-05-2014 | #4 |
Новый участник Сообщения: 34
|
Профиль | Отправить PM | Цитировать |
|
Отправлено: 15:41, 12-05-2014 | #5 |
Новый участник Сообщения: 34
|
Профиль | Отправить PM | Цитировать аааааааааа, извиняюсь за тупость, просто че то ступил, все работает как надо. Еще раз огромное человеческое спасибо.)))))))))
|
Отправлено: 15:58, 12-05-2014 | #6 |
Старожил Сообщения: 168
|
Профиль | Отправить PM | Цитировать maxd2007, один момент: Send работает с активным окном, по хорошему на всякий случай, если какая-то программа перехватит фокус или выдаст окно сообщения, можно добавить что-нибудь вроде
перед Send($aLines[$i]). [CLASS:Notepad] - это для блокнота Windows, Au3Info в помощь. |
------- Отправлено: 03:04, 15-05-2014 | #7 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
VBA - Visual Basic Чтение строк из txt | Startup | Программирование и базы данных | 2 | 23-09-2012 17:48 | |
CMD/BAT - Чтение всего txt файла в переменную bat | binwatch@vk | Скриптовые языки администрирования Windows | 10 | 09-09-2012 18:57 | |
CMD/BAT - [решено] удалить из имени фаила пробелы | erufa | Скриптовые языки администрирования Windows | 4 | 11-04-2012 12:35 | |
CMD/BAT - [решено] Чтение определённой строки из txt | hxygen | Скриптовые языки администрирования Windows | 10 | 16-11-2010 02:53 | |
CMD/BAT - чтение / запись *.txt | RUVATA | Скриптовые языки администрирования Windows | 8 | 06-08-2010 15:43 |
|