脚本编程 4 驱动器
2019-10-26 17:57:45
供稿：网友
驱动器的编程对黑客编程来说至关重要。好在vbs给我们提供了方便的集合，使得工作变得很简单。
1、检查驱动器
使用filesystemobject的driveexists方法
例如：
set fs=createobject("scripting.filesystemobject")
if fs.driveexists("h") then
......
2、获得驱动器属性
可以使用getdrive方法，然后可以通过drive对象的属性或的驱动器的属性。常用属性有
drivetype:以整数形式返回驱动器的类型 0表示unknown 1表示可移动的 2表示固定的 3表示网络驱动器 4表示cd-room
5表示ram盘
freespace:可用空间
totalsize:总空间
volumename：驱动器标卷
例如：
********************************************************
set fs=createobject("scripting.filesystemobject")
set drv=fs.getdrive("D")
t=drv.drivetype
y=drv.freespace
wscript.echo "类型" & t
wscript.echo "可用空间" & y
*******************************************************
如果大家还记得的话，应该知道还有个drives集合，这个东西比前面所说得更方便，比如我们要得到系统上所有的驱动器可以得到这个集合，然后使用foreach来检查。另外，有时候我们要编制一个病毒，可能会要感染软盘，这个时候我们需要检查软盘是不是准备好了，看下面这个程序：
**********************************************************
wscript.echo getdrivelist()
function getdrivelist() '自定义函数
dim fs,d,dc,s,n,crlf
crlf=chr(13)&chr(10)
set fs=createobject("scripting.filesystemobject")
set dc=fs.drives '获得驱动器集合
for each d in dc
n=""
s=s &d.driveletter & "--"
if d.drivetype=remote then
n=d.sharename
elseif d.isready then
n=d.volumename
end if
s=s & n& crlf
next
getdrivelist=s
end function
***********************************************************
3、映射网络驱动器
网络共享对于脚本用户来说必须经过映射才能够使用。使用network对象的mapnetworkdrive方法可以实现映射。
