Небольшие программки для написания которых нужен только блокнот...

[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, он дал мне этот код. Если у кого есть чтото подобное - выкладывайте...

[SETRA]

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

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

[PriN_ce]

Хочу добавить про пакетные файлы...
Очень очень очень хорошо изложено здесь.
А главное на примерах)

[Leib]

ааааааааа.... кАк ЭтУ ФигнЮ оТмеНитЬ????????

[Serjone]

Убей процесс WScript.exe
В следующий раз смотри что компилируешь

[VeTaLMasH]

Не получается что-то

[Serberg]

Не получается что-то

Скопировать текст и переименовать файл не в состоянии чтоли ? Или у тебя не винда ?

[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 , но вот сам код иначе , как грязным программированием назвать язык не поворачивается.

[Pamel]

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

с таким не нужно шутить! еще дописать принт делете и все компу пипец ребята! он тогда полностью форматнетса и это не остановить!

[dmitrijan]

Открываем блокнот, вбиваем код

start /wait telnet towel.blinkenlights.nl

сохраняем под любым именем только с расширением .bat и наслаждаемся просмотром "Звездных войн 4" прямо в консоли, только обязательное условие должен быть подключен интернет !

[nikehin]

Serberg, я перезагрузил комп и у меня это пропало. оно ещё появится?

[Serberg]

Serberg, я перезагрузил комп и у меня это пропало. оно ещё появится?

Если еще раз запустишь - то да )))

[FullSheF]

на BAT вирусы писать