RMMICT@FACEBOOK

Khamis, Mei 12, 2011

Notepad Trick

Notepad adalah salah satu item yang membolehkan kita untuk membuat pengaturcaraan yang mudah. Hari ini saya ingin mengajar anda bagaimana untuk membuat satu trick yang mudah serta boleh di buat dalam masa yang singkat. Trick ini akan membolehkan CD-ROM anda terbuka dan tertutup sendiri. Jom cuba main-main di pc orang lain.....

Langkah-langkahnya :-

Buka Notepad anda dan taip pengaturcaraan di bawah:-
set owmp = createobject("wmplayer.ocx.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count -1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count -1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
Save sebagai “cdtray.VBS” dan double klik untuk melihat kesannyer..hehehe
p/s : jika tidak berjaya cuba type sendiri ayat pengaturcaraan pada baris pertama tersebut set owmp = createobject("wmplayer.ocx.7") dengan mengunakan keyboard, jika tidak boleh juga hubungi blogger di bawah...


sumber : http://www.myictrooms.co.cc

0 comments :

Kata-kata Bermakna


"Inovation has nothing to do with how many R&D dollars you have. It's not about money. It's about the people you have, how you're led, and how much you get it....It's rare that you see an artist in his 30s or 40s able to really contribute something amazing- Steve Jobs"..."If you born poor, it’not your mistake. But if you die poor, it’s your mistake....I don't know' has become 'I don't know yet....Your most unhappy customers are your greatest source of learning - Bill Gates"