යාලුවනේ....ඔන්න ටික දවසකට පස්සේ බ්ලොගිය පැත්තේ ආවා...අද අපි පොඩි විනෝද වැඩකට බහින්නයි යන්නේ.....මේක කරන්නේ Notepad එකෙන්....
මේකෙන් පුළුවනි මේක ක්රියාත්මක වෙන පරිගණකයේ CD rom එක ඇරෙනවා වැහෙනවා කරන්න...යාළුවෙකුට දෙන්න නියම තෑග්ග...මොකද මිනිහා ගිහින් මේක ඕපන් කලාම CD rom එක ඇරෙනවා වැහෙනවා වෙනවා...කොහොමද වැඩේ?යාලුවන්ව බය කරන්න කියාපුම ක්රමයක් නේද?හැබැයි Joke තේරෙන යාළුවෙක්ට විතරක් මේක දෙන්න.මොකද නැත්ත මිනිහට කේන්ති යයි.කතා කල මැදෑ දැන්...ඔන්න එහෙනම් වැඩේට බහිමු...මුලින්ම notepad එක open කරන් ඉන්න ඊට පස්සේ පහත සඳහන් කෝඩ්ස් කොපි කරලා නොට් පැඩ් එකට පේස්ට් කරන්න....
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
දැන් මේක සෙවූ කරනකොට මොකක් හරි නමක් ගහලා.VBS
කියන එක ගහල සෙවූ කරන්න .. දැන් ඉතින් මේක වටේ ඇරලා
බලන්නකෝ.......
එහෙනම් COMMENT එකකුත් දාලා යන්න හොඳේ...
