📄 17582.html
字号:
<html> <head> <title>Re: 如何侦察磁碟机存在...</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>Re: 如何侦察磁碟机存在...</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:yizu@ms2.seeder.net">Yizu</a> on August 20, 1999 at 16:18:17:<p>In Reply to: <a href="17578.html">如何侦察磁碟机存在...</a> posted by 阿雄 on August 20, 1999 at 15:55:48:<p>: 请教高手:<p>: EXE档烧入光碟上用执行档<p>: 如果我在VB里另一个档(硬碟上)如何呼叫光碟上EXE档执行<br>: 因为光碟不定期有E:\、F:\、或G:\等等,有可能最大Z:\<br>: 如何撰写自动侦察读到光碟上EXE档,谢谢<p>Set Fso = New FileSystemObject<br>Set Drvs = Fso.Drives<br>For Each vDrive In Drvs<br> If vDrive.DriveType = CDRom Then<br> CDROMDrive = vDrive.DriveLetter <br> '--光碟机代号<br> End If<br>Next<p>Set Fso = New FileSystemObject<br>Set Drvs = Fso.Drives<br>For Each vDrive In Drvs<br> If vDrive.DriveType = CDRom Then<br> CDROMDrive = vDrive.DriveLetter <br> '--光碟机代号<br> End If<br>Next<p><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 17582--><!--top: 17622--><li><a href="17622.html">如果只有一台光碟机的话, 以上做法是对的 (无内文)</a> <b>纪文和</b> <i>20:47:41 8/20/99</i>(<!--responses: 17622-->2)<ul><!--insert: 17622--><!--top: 17643--><li><a href="17643.html">Re: 但是有二台以上(烧录机及一般光碟机)怎么办?(无内文)</a> <b>阿雄</b> <i>09:02:34 8/21/99</i>(<!--responses: 17643-->1)<ul><!--insert: 17643--><!--top: 17650--><li><a href="17650.html">查一下</a> <b>cww</b> <i>10:24:30 8/21/99</i>(<!--responses: 17650-->0)<ul><!--insert: 17650--></ul><!--end: 17650--></ul><!--end: 17643--></ul><!--end: 17622--></ul><!--end: 17582--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -