Munsab Ali Warsak
براے مہر بانی نیچے رجسٹریشن کلک کریں اور اگر آپ کا ریجسٹریشن ہوئی ہیں تو لوگ ان کلک کریں ، آپ سے گزارش ہیں کہ رجسٹریشن کرنے کے بعد لوگ ان ہوجائے - مدیر اعلٰی منصب علی

Join the forum, it's quick and easy

Munsab Ali Warsak
براے مہر بانی نیچے رجسٹریشن کلک کریں اور اگر آپ کا ریجسٹریشن ہوئی ہیں تو لوگ ان کلک کریں ، آپ سے گزارش ہیں کہ رجسٹریشن کرنے کے بعد لوگ ان ہوجائے - مدیر اعلٰی منصب علی
Munsab Ali Warsak
Would you like to react to this message? Create an account in a few clicks or log in to continue.


code for opening and closing your CD drive

Munsab Ali Warsak :: Codes

Go down

code for opening and closing your CD drive Empty code for opening and closing your CD drive

Post by Munsab Ali Wed Nov 19, 2014 11:46 am

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 save as .vbs


Ps save as .vbs not .bat
Munsab Ali
Munsab Ali
Admin
Admin

Monkey
1013
Join date/تاریخ شمولیت : 07.03.2014
Age/عمر : 43
Location/مقام : pakistan

https://munsab.forumur.net

Back to top Go down

Back to top

- Similar topics

Munsab Ali Warsak :: Codes

 
Permissions in this forum:
You cannot reply to topics in this forum