Бормотухи.НЕТ

Вернуться   Бормотухи.НЕТ > Компьютеры > Программирование
Расширенный поиск

Программирование Все о программировании ....

Ответ
 
Опции темы Поиск в этой теме
Старый 02.03.2008, 15:03 Вверх   #1
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
Хорошо Небольшие программки для написания которых нужен только блокнот...

Вот интересная программка, которая пишется прямо в блокноте

1. Открываем блокнот.
2. Копируем туда код:
Код:
echo Chr(39)>%temp%\temp1.vbs
echo Chr(39)>%temp%\temp2.vbs
echo on error resume next > %temp%\temp.vbs
echo Set S = CreateObject("Wscript.Shell") >> %temp%\temp.vbs
echo set FSO=createobject("scripting.filesystemobject")>>%temp%\temp.vbs
echo do >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{capslock}" >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{numlock}" >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{scrolllock}" >> %temp%\temp.vbs
echo loop>> %temp%\temp.vbs
start %temp%\temp.vbs
start %temp%\temp1.vbs
start %temp%\temp2.vbs
3. Сохраняем файл под любым именем.
4. Изменяем расширение файла с TXT на BAT.
5. Запускаем и радуемся красоте....

ЗЫ:
Спасибо toxIC, он дал мне этот код. Если у кого есть чтото подобное - выкладывайте...
  Ответить с цитированием
5 пользователя(ей) сказали cпасибо:
Старый 02.03.2008, 16:00 Вверх   #2
Профессиональный DJ
 
Аватар для SETRA
SETRA вне форума
Доп. информация
По умолчанию

А спомощью BAT2EXE это будет выглядеть законченным продуктом.

http://ru.handyarchive.com/download/..._Converter.zip

Последний раз редактировалось Serberg; 28.08.2008 в 09:10..
  Ответить с цитированием
Cказали cпасибо:
Старый 22.05.2008, 19:01 Вверх   #3
Пользователь
 
Аватар для PriN_ce
PriN_ce вне форума
Доп. информация
По умолчанию

Хочу добавить про пакетные файлы...
Очень очень очень хорошо изложено здесь.
А главное на примерах)
  Ответить с цитированием
Cказали cпасибо:
Старый 27.08.2008, 23:50 Вверх   #4
Опытный пользователь
 
Аватар для Leib
Leib вне форума
Доп. информация
По умолчанию

ааааааааа.... кАк ЭтУ ФигнЮ оТмеНитЬ????????
  Ответить с цитированием
Cказали cпасибо:
Старый 28.08.2008, 07:56 Вверх   #5
Опытный пользователь
 
Аватар для Serjone
Serjone вне форума
Доп. информация
По умолчанию

Убей процесс WScript.exe
В следующий раз смотри что компилируешь
  Ответить с цитированием
Cказали cпасибо:
Старый 24.03.2009, 19:07 Вверх   #6
Пользователь
 
Аватар для VeTaLMasH
VeTaLMasH вне форума
Доп. информация
По умолчанию

Не получается что-то
  Ответить с цитированием
Cказали cпасибо:
Старый 24.03.2009, 21:18 Вверх   #7
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

Цитата Сообщение от VeTaLMasH Посмотреть сообщение
Не получается что-то
Скопировать текст и переименовать файл не в состоянии чтоли ? Или у тебя не винда ?
  Ответить с цитированием
Cказали cпасибо:
Старый 09.04.2009, 05:57 Вверх   #8
SEO & WebMoney support
 
Аватар для MaiJiN
MaiJiN вне форума
Доп. информация
По умолчанию

Serberg, на будущее, лучше сразу пояснить , как будет работать запущенный батник.

В кратце - создаётся объектная переменная типа Shell ("оболочка", командная строка) : Set S = CreateObject("Wscript.Shell") >> %temp%\temp.vbs , вывод с которой перенаправляется в файл "temp.vbs" , находящийся в директории временных файлов по умолчанию, где конкретно - смотрим в панели переменных окружения винды.
Далее создаётся файл вывода, в который был перенаправлен вывод ...
В дальнейшем мы видим бесконечный цикл, в котором в обработчик вызовы метода sendkeys объекта класса "Оболочка". А если по-русски, то нажатия клавиш. В результате должны увидеть загорающиеся через 0,2 секунды лампочки Капса, НумЛок и СкроллЛок...

Даже без создания батника можно разобраться. Теперь создаю, запускаю 5 раз (специально!) , всё работает, но... wscript процесс запущен ровно в 5 экземплярах.
Можно было бы хотя бы для приличия сделать проверку на наличие процесса в памяти... А то представим ситуацию - юзер не знает, что ожидать от скрипта, раз-два-три ... 20 раз попробовал запустить, увидел светоиды мигающие, понравилось...
И отключать в таком случае эту хрень через диспетчер он будет ооочень нудновато.
Не говорю уже от машинках с 256 Mb RAM под виндой XP, где 20 процессов по 5,3 метра смогут "помочь" винде впасть в своппинг. И самое обидное, что у юзера скажется впечатление, что программа - шутка являет собой какой-то вирус, т.к. по его мнению комп станет тормозить (ведь пользователь проги может быть и ЧАЙНИКОМ, не стоит пренебрегать защитой от неопытности!).
К тому же, возможны утечки памяти , т.к. нет вызова деструктора объекта S , что , впрочем, объяснимо, ведь даже стандартного выхода по хоткеям в проге нет, есть только терминирование процесса. Но тем не менее, объект повиснет в памяти.

ИТАК ВЕРДИКТ: за идею, оригинальность и поднятие настроя и жизненного тонуса - 5 , но вот сам код иначе , как грязным программированием назвать язык не поворачивается.
  Ответить с цитированием
Cказали cпасибо:
Старый 13.06.2009, 00:22 Вверх   #9
Грамотный форумчанин
 
Аватар для Pamel
Pamel вне форума
Доп. информация
По умолчанию

Цитата Сообщение от MaiJiN Посмотреть сообщение
на будущее, лучше сразу пояснить , как будет работать запущенный батник.
с таким не нужно шутить! еще дописать принт делете и все компу пипец ребята! он тогда полностью форматнетса и это не остановить!
  Ответить с цитированием
Старый 23.07.2010, 08:18 Вверх   #10
Пользователь
 
Аватар для dmitrijan
dmitrijan вне форума
Доп. информация
По умолчанию

Открываем блокнот, вбиваем код
Код:
start /wait telnet towel.blinkenlights.nl
сохраняем под любым именем только с расширением .bat и наслаждаемся просмотром "Звездных войн 4" прямо в консоли, только обязательное условие должен быть подключен интернет !

Последний раз редактировалось Ghost; 23.07.2010 в 16:31.. Причина: Неверный цвет выбрал.
  Ответить с цитированием
Старый 13.09.2010, 18:26 Вверх   #11
Местный житель
 
Аватар для nikehin
nikehin вне форума
Доп. информация
По умолчанию

Serberg, я перезагрузил комп и у меня это пропало. оно ещё появится?
  Ответить с цитированием
Старый 13.09.2010, 20:48 Вверх   #12
Коварный тип
 
Аватар для Serberg
Serberg вне форума
Доп. информация
По умолчанию

Цитата Сообщение от nikehin Посмотреть сообщение
Serberg, я перезагрузил комп и у меня это пропало. оно ещё появится?
Если еще раз запустишь - то да )))
  Ответить с цитированием
Старый 29.12.2010, 13:41 Вверх   #13
Опытный пользователь
 
Аватар для FullSheF
FullSheF вне форума
Доп. информация
По умолчанию

на BAT вирусы писать
  Ответить с цитированием
Ответ

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема написания сообщений с цифрой 11 cest vBulletin 4.x 6 22.02.2010 19:54
программа для написания e-boock Ghost Сайтостроение 0 04.01.2010 15:11
Флуд про хостинг и не только olegrus Архив тем 50 04.11.2009 10:34
ЗнатоКи НаписанИя СкриПтоВ ПОМОГИТЕ!!! KAN66 Интернет 6 16.07.2009 00:48
10 ситуаций, в которых женщина не откажется от секса Алёнка Секс 0 19.12.2008 23:30


Текущее время: 04:12. Часовой пояс GMT +3.


Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2024, vBulletin Solutions, Inc. Перевод: zCarot
 

Время генерации страницы 0.13789 секунды с 12 запросами