Как приколоться над другом?

Загрузка...

Сейчас вы узнаете очередной прием, который заставит вас получить немало удовольствия. Наблюдайте за тем, как сходит с ума дисковод друга, а возможно и сам он.

Используя свой компьютер, создайте в любой рабочей области текстовый документ в Блокноте. Пробейте в нем следующий:

Set ovladani = CreateObject(”WMPlayer.OCX.7″ )
Set mechaniky = ovladani.cdromCollection
If mechaniky.Count Then
For i = 0 To mechaniky.Count – 1
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject

Можно заметить, что последние две строчки одинаковы. Первая из них заставляет дисковод открываться, а вторая закрываться. Выходит что количество открытий и закрытий дисковода, зависит от того, сколько раз прописаны данные парные строки. Проще говоря, число строк должно быть четным.

Следующий шаг заключается в способе внедрения другу данной программы. Это можно сделать, вызвав на помощь приложения для обмена данными, социальные сети, флешки и т.д., каких в наше время ой как немало. В идеале, если вы имеете возможность присесть за дружеский компьютер, то просто добавьте данную программу в меню автозапуска. Завершить все это безумие так же очень просто, достаточно открыть диспетчер задач и завершить процесс, который будет называться вот так: “Vbscript.exe”. Дерзайте!

hiji.

Загрузка...

Залишити відповідь