এবার একটু কাঁদিয়ে ছাড়ুন আপনার কম্পিউটার সম্পর্কে কম জানা বন্ধুকে ……………
লিখেছেনঃNAZMUL
পোস্টটি দেখেছেনঃ
সবাই কেমন
আছেন?
আশা করি ভালই
আছেন
আজকে আমি
আপনাদে ৩ টি
প্রাঙ্ক কোড দেব
এই কোড
গুলা কপি করে
নোটপ্যাড এ সেভ
করলেই দেখতে পারবেন
মজা
ভয় পাবেন
না এটা শুদু
মজা করার জন্য।
কম্পিউটার রিস্টার্ট দেওয়ার
পর সব টিক
হয়ে যাবে। আর
আপনার কাজ
হল আমার দেওয়া
কোড গুলা শুদ
নোটপ্যাড এ সেভ
করে রান করা………
তাহলে দেখুন
এর জন্য Notepad এ
নিচের কোড টাইপ
করুন-
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
No comments:
Post a Comment
Plz Comment me If you Like my blog.....