ရာမညေျမမွႀကိဳဆိုပါ၏.....ေပ်ာ္ရႊင္ခ်မ္းေျမ့ႀကပါေစ.....

ကၽြန္ေတာ္တို့ ၀င္းဒိုးတင္တယ္ .။ ဒါမွမဟုတ္လည္း ေခြထည့္ပီးေတာ့ ဇတ္ကားေတြႀကည့္တယ္

အဲ့လိုအခါမ်ိဳးမွာ အထုတ္ ကေတာ ့Eject ဆိုတာပါေတာ့ ထုတ္လို့ရတယ္.။ ျပန္ထည့္ဖို့ႀကေတာ့ မတ္တပ္ေလးထထပီးမွ

ျပန္သြားထည့္ေနကတယ္.။ အဲ့လို မလုပ္ခ်င္ဘူး ဒီတိုင္းေလးပဲ ထိုင္ေနရင္းနဲ့ ေခြ အထုတ္အသြင္း လြယ္ကူစြာျပဳလုပ္

လို့ရႏိုင္မယ့္ နည္းေလးပါ.။

ေအာက္က ကၽြန္ေတာ္ ေရးထားတဲ့ စာေတြကို Notepad ထဲမွာ ထည့္ပီးေတာ့ .vbs နဲ့ Save လိုက္ပါ.။

Set oWMP = createObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
colCDROMs.Item(i).Eject
Next ' cdrom
End If



အေပၚကစာကေတာ့ CD Rom အဖြင့္နဲ့အပိတ္အတြက္ျဖစ္ပါတယ္.။

ေအာက္က စာကေတာ့ အဖြင့္အတြက္ပါ.။

Set oWMP = createObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If



ပီးရင္ေတာ့ လြယ္ကူစြာအသံုးျပဳႏိုင္ပါပီ ခညာ.။

ေက်းဇူးတင္ပါတယ္....