嗨!您好!Welcome my blog

如有恒,何须三更起,半夜眠;最怕莫,三天打鱼两天晒网,竹篮打水一场空

用户操作
[留言]  [发消息]  [加为好友] 
订阅我的博客
XML聚合    FeedSky
订阅到鲜果
订阅到Google
订阅到抓虾
xwqjamky的公告
<!--计数器--> <script src="http://www.xcinfo.ha.cn/jsq/default.asp?User=xwqjamky&Length=6&x=15&y=20&Mode=002"></script> <!-- QQ在线状态显示 --> <div align="center"> <a target=blank href=http://wpa.qq.com/msgrd?V=1&Uin=4936422&Site=im.qq.com&Menu=yes><img border="0" SRC=http://wpa.qq.com/pa?p=1:4936422:13 alt="jamky"></a> </div>
文章分类
电大论文集
论文
论文
电大论文集
存档

原创  检查计算机是不是有DVD光驱VBS代码 收藏

strcomputer="."
set objwmiservice=getobject("winmgmts:\\"&strcomputer&"\root\cimv2")
set colitems=objwmiservice.execquery("select * from win32_cdromdrive")
for each objitem in colitems
  wscript.echo "drve letter:"&objitem.drive
  wscript.echo "caption:" & objitem.caption
next 

发表于 @ 2007年11月27日 21:18:00 | 评论( loading... ) | 编辑| 举报| 收藏

旧一篇:VB.Net实现Ftp下载的方法 | 新一篇:VB.Net让Textbox只能输入数字的方法

  • 发表评论
  • 评论内容:
  •  
Copyright © xwqjamky
Powered by CSDN Blog