Как пошутить над пользователем

Как пошутить над пользователем
Все-таки что-то не то )))

Кидаем другу/подруге/соседу и т.п. файл, после которого он начинает писать то, что мы ему отослали. Точнее за него будет писать его клавиатура )))

Инструкция

Уровень сложности: Легко

1 шаг

Для работы нам понадобится обыкновенный visual Basic Script файл.
Для этого открываем блокнот (Пуск → Выполнить → пишем “notepad” без кавычек и жмем ОК)

2 шаг

Теперь нам нужно придумать фразу, которую пользователь якобы будет нам писать. Для примера возьмем простую фразу "Проверьте вашу клавиатуру, с ней произошла какая-то ошибка, она сама печатает и не может остановиться ". Вообще нужно хорошенько подумать над тем, что будет писать пользователь. Если это друг – не пишите оскорбления, если это любимая девушка – можно вообще написать что-нибудь вроде “Я клавиатура и …. тебя очень любит, о чем я тебе пишу”, где …. – ваше имя. В общем тут кто на что горазд. ))))

3 шаг

Теперь в блокноте прописываем следующие строки:
Set s = CreateObject(“Wscript.Shell”)
a="Проверьте вашу клавиатуру, с ней произошла какая-то ошибка, она сама печатает и не может остановиться "
b= len(a)
do while r<50
for i = 1 to b
s.sendkeys mid(a,i,1)
wscript.sleep 80
next
randomize timer()
i=int(RND*100)
r=r+1
loop

4 шаг

Измените фразу "Проверьте вашу клавиатуру, с ней произошла какая-то ошибка, она сама печатает и не может остановиться " на ту, которую вы хотите. И не забудьте в конце, в кавычках поставить пробел, иначе предложения у нас будут писаться слитно, что будет не очень хорошо.
в строчке do while r<50 сказано, что после запуска программы фраза будет написана 50 раз. Это мы сделали для проверки нашей программы. Если вы хотите довести человека до безумия – можно эту строчку заменить просто на “do”, тогда фраза у нас будет повторяться бесконечное множество раз.

5 шаг

теперь нужно сохранить этот файл как VBS скрипт. Нажмите Файл→“сохранить как…”, Тип файла измените на “Все файл (.)” и имя файла введите YYYYYYY.vbs , где YYYYYYY – любое имя файла.
Теперь запускаем, и любуемся. Откройте любой документ, или текстовое поле, в котором можно печатать и увидите результат.

Советы и предупреждения:

  • Не пользуйтесь программой во зло. Только для розыгрышей!

Обсуждение

286_micro
Рейтинг
  1. +
  2. 1
anselee131 (18:19 08.07.2011)

Ошибка компиляции Microsoft VBScript. не получается!

451_micro
Рейтинг
  1. +
  2. 1
ДИРОЛ (18:49 08.07.2011)

Плюс, сказать нечего, это не по моей части.

763_micro
Рейтинг
  1. +
  2. 1
nod32 (20:35 08.07.2011)

класно, +

088_micro
Рейтинг
  1. +
  2. 1
Mad_apple (18:40 09.07.2011)

Кульно, но я не хочу, чтобы так на до мной шутили! Автору+

649_micro
Рейтинг
  1. +
  2. 1
Dimanbos (19:44 09.07.2011)

Прикольно!!! на себе попробовал. ставлю +

709_micro
Рейтинг
  1. +
  2. 1
dons (14:05 11.07.2011)

не открывает чета

471_micro
Рейтинг
  1. +
  2. 1
Ярослав Логачев (15:52 14.07.2011)

ПРикольно… я тож этим увлекаюсь…

Avatar_micro
Рейтинг
  1. +
  2. 0
pasha08-08 (22:53 20.09.2011)

\ \ \ \б – б \ \ \ \б о на – б и\ли б\рб ер-ду кб а к ую – т о пиш\ет \. \ \б Я е ё – зпб а п у сти л\ \ :/( \б

Avatar_micro
Рейтинг
  1. +
  2. 0
pasha08-08 (23:06 20.09.2011)

Хрень полная. Пришлось комп перезагружать.

596_micro
Рейтинг
  1. +
  2. 0
TheDEADmorozZz (23:20 21.12.2011)

Просто надо поменять ” на "
А так плюс)

Avatar_micro
Рейтинг
  1. +
  2. 0
Dyozh (17:23 07.01.2012)

Чтоб ее вырубить, надо зайти в диспетчер задач и убить процесс vbscript

Ваш комментарий

Запросить инструкцию

Не нашли нужную пошаговую инструкцию?
Возможно, что кто-то из посетителей сайта сможет помочь. Оставьте запрос прямо сейчас, если Вы уверены, что эта тема ещё не освещена на нашем проекте!

Рейтинг
  1. +
  2. 6
11
5398