-
Авто / Мото
-
Безопасность
-
Бизнес
-
Деньги
-
Дети
-
Дом
-
Еда и Напитки
-
Животные
-
Закон
-
Здоровье и Коронавирус
-
Интернет
-
Карьера и Работа
-
Компьютеры
-
Культура и Искусство
-
Мода и Красота
-
Обучение
-
Отдых
-
Отношения
-
Праздники
-
Путешествия
-
Развлечения
-
Сад и огород
-
Семья
-
Спорт и Фитнес
-
Техника
-
Фото и Видео
-
Хобби
-
Другое
-
aKak.ru
Как пошутить над пользователем
Кидаем другу/подруге/соседу и т.п. файл, после которого он начинает писать то, что мы ему отослали. Точнее за него будет писать его клавиатура )))
Инструкция
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 – любое имя файла.
Теперь запускаем, и любуемся. Откройте любой документ, или текстовое поле, в котором можно печатать и увидите результат.
Советы и предупреждения:
- Не пользуйтесь программой во зло. Только для розыгрышей!
Запросить инструкцию
Не нашли нужную пошаговую инструкцию?
Возможно, что кто-то из посетителей сайта сможет помочь. Оставьте запрос прямо сейчас, если Вы уверены, что эта тема ещё не освещена на нашем проекте!
Обсуждение
Ошибка компиляции Microsoft VBScript. не получается!
Плюс, сказать нечего, это не по моей части.
класно, +
Кульно, но я не хочу, чтобы так на до мной шутили! Автору+
Прикольно!!! на себе попробовал. ставлю +
не открывает чета
ПРикольно… я тож этим увлекаюсь…
\ \ \ \б – б \ \ \ \б о на – б и\ли б\рб ер-ду кб а к ую – т о пиш\ет \. \ \б Я е ё – зпб а п у сти л\ \ :/( \б
Хрень полная. Пришлось комп перезагружать.
Просто надо поменять ” на "
А так плюс)
Чтоб ее вырубить, надо зайти в диспетчер задач и убить процесс vbscript
Ваш комментарий