<script language=vbscript>
<!–
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
–>
</script>
就这么一小断很管用的^_^