Если это ваш первый визит, рекомендуем почитать справку по форуму. Для размещения своих сообщений необходимо зарегистрироваться. Для просмотра сообщений выберите раздел. |
написать BATничек |
Философия, технологии, алгоритмы! |
|
Опции темы |
24.03.2006, 20:42 | #3 |
хроник
Сообщений: 5,521
Регистрация: 15.01.2005
Возраст: 44
Не в сети |
не работает!
убрал execute, прога myProg.exe запустилась, а в черном окне пишет- "CopyStrToClipBoard" не является внутренней или внешней командой, исполняемой программой или пакетным файлом. cсоответствено в буфере пусто как быть? ps если че, XP |
25.03.2006, 16:01 | #5 |
Кэп Улитка
Сообщений: 8,067
Регистрация: 04.05.2005
Возраст: 43
Не в сети |
Что то в таком духе (у мя 98 - SendKeys - не фуpычит, пpовеpить не могу).
Это не bat - это лучше ---------------- 1.vbs ---------------- set objShell = WScript.CreateObject("WScript.Shell") objShell.Run "notepad", 5 ' Тут надо заголовок заменить скоpее всего objShell.AppActivate "Блокнот" WScript.Sleep 100 objShell.SendKeys "твой текст" WScript.Sleep 2500 ' Выделяем все objShell.SendKeys "^a" WScript.Sleep 2500 ' Коиpуем в буффеp objShell.SendKeys "^c" WScript.Sleep 2500 ' Закpываем блокнот ' Кажется он там сохpанить захочет - откажем objShell.SendKeys ({ESC}) objShell.SendKeys ({RIGHT}) objShell.SendKeys ({ENTER}) ' И наконец стаPт твоего exe objShell.Run "my.exe", 5 |
25.03.2006, 23:40 | #9 |
Кэп Улитка
Сообщений: 8,067
Регистрация: 04.05.2005
Возраст: 43
Не в сети |
Написано же - поместить в фаил с именем например 1.vbs и запускать вместо bat-ника.
(предварительно отредактировав малек - голова я думаю у тя имеется) по смыслу - делается следуещее (почти построчно) Запускается блокнот. Спим (ждем пока запустится) Активируется Спим (ждем пока активиуется) посылаем нажатие клавиш Спим (пока нажатия обработаются) посылаем нажатие ctrl-A (~ выделить все) Спим (понятно почему) послваем нажатие ctrl-V (~ закопировать в буффер стоку) дрыхнем --теперь осталось закрыть блокнот посылаем нажатие ESC (надеюсь у тя альтенативный блокнот, выход из котоого по ESC сработает - bred 2 или akelpad) --Однако предложит сохранить фаил - надо отказаться - для этого посылаем нажатие стрелки вправо и ентер. последняя строка запускает твою прогу (5 означает, что она будет видна и активна) Если вопросы еще - попробуй отловить в ваське. Вообще это Windows Script Нost. |
26.03.2006, 00:51 | #10 | |
хроник
Сообщений: 5,521
Регистрация: 15.01.2005
Возраст: 44
Не в сети |
Yandex, после замены () на "" и установки akelpad все заработало, но есть вопросы
set objShell = WScript.CreateObject("WScript.Shell") objShell.Run "D:\Text\akelpad\akelpad.exe" , 5 objShell.AppActivate "Блокнот" - зачем это надо, и что имелось в виду под "Блокнот" WScript.Sleep 100 objShell.SendKeys "бла-бла-бла" WScript.Sleep 250 ' Выделяем все objShell.SendKeys "^a" WScript.Sleep 250 ' Коиpуем в буффеp objShell.SendKeys "^c" WScript.Sleep 250 ' Закpываем блокнот ' Кажется он там сохpанить захочет - откажем objShell.SendKeys "{ESC}" objShell.SendKeys "{RIGHT}" objShell.SendKeys "{ENTER}" ' И наконец стаPт твоего exe objShell.Run "прога.exe", 5 Цитата:
зы аськи нету |
|
26.03.2006, 09:47 | #12 |
Registered User
Сообщений: 1,905
Регистрация: 25.03.2003
Не в сети |
http://www.petri.co.il/software/clip.zip.
суешь ее куданить в с:\tls (СЛАВАРЕТУ или кто там придумал этот каталог писать на имаджи) и набиваешь примерно такой файл : echo "это строка помещается в буфер обмена" | c:\tls\clip "C:\Program files\блаблабла\бла.exe" |
27.03.2006, 20:41 | #13 |
Кэп Улитка
Сообщений: 8,067
Регистрация: 04.05.2005
Возраст: 43
Не в сети |
C доки
0 - Hides the window and activates another window. 1 - Activates and displays a window. If the window is minimized or maximized, the system restores it to its original size and position. An application should specify this flag when displaying the window for the first time. 2 - Activates the window and displays it as a minimized window. 3 - Activates the window and displays it as a maximized window. 4 - Displays a window in its most recent size and position. The active window remains active. 5 - Activates the window and displays it in its current size and position. 6 - Minimizes the specified window and activates the next top-level window in the Z order. 7 - Displays the window as a minimized window. The active window remains active. 8 - Displays the window in its current state. The active window remains active. 9 - Activates and displays the window. If the window is minimized or maximized, the system restores it to its original size and position. An application should specify this flag when restoring a minimized window. 10 - Sets the show-state based on the state of the program that started the application. То есть те 0 нужен, а не 5. Вообще конечно как netwind лучше сделать - а не фигней страдать, как это я сделал )) (вообще таких прог дофига, да и настрочить ее за 10 мин мона [только для тескта]). |