快速业务通道

vbscript脚本编程教程2利用fso来进行文件操作

作者 佚名 来源 ASP编程 浏览 发布时间 2013-07-09
我忘记了请大家提醒我

setfs=wscript.createobject(“scripting.filesystemobject”)

setwshshell=wscript.createobject(“wscript.shell”)

osdir=wshshell.expandenvironmentstrings(“%systemroot%”)

setf=fs.getfolder(osdir)

wscript.echof



当然,还有简单的方法那就是使用getspecialfolder()

这个方法使用3种值:

0表示windows文件夹,相关常量是windowsfolder

1系统文件夹,相关常量是systemfolder

2临时目录,相关常量temporaryfolder

看下面的例子:

***********************************getspecialfolder***************************

setfs=wscript.createobject(“scripting.filesystemobject”)

setwfolder=fs.getspecialfolder(0)‘返回windows目录

setwfolder=fs.getspecialfolder(1)‘返回system32\

setwfolder=fs.getspecialfolder(2)''返回临时目录



3、使用文件

使用文件属性:

文件夹的属性我没有说,大家可以从文件属性里举一反三

文件属性常用的就是:

normal0

readonly1

hideen2

system4



setfs=wscript.createobject(“scripting.filesystemobject”)

setf=fs.gerfile(“d:\index.txt”)

f.attributes=f.attributes+1



这里由于不知道d:\index.txt的文件属性,所以会发生不可预测的结果,如果文件的属性是0,那么就会变成1。所以最好在改变属性前查询



创建

创建前需要检查文件是否存在,方法和前面说的文件夹的方法一样

*****************************file.vbs**********************************

setfs=wscript.createobject(“scripting.filesystemobject”)

iffs.fileexists(“c:\asd.txt”)then

s=”available”

else

s=notexist”

setf=fs.createtextfile(“c:\asd.txt”)

endif

当然我们也可以使用setf=fs.createtextfile(“c:\asd.txt”,true)

来强制覆盖已存在的文件。



复制移动删除文件

和文件夹一样我们既可以使用fso提供的方法也可以用file对象

setfs=wscript.createobject(“scripting.filesystemobject”)

fs.copyfile“c:\asd.txt”,”d:\1\asd.txt”,true‘复制文件,如果已存在就强制覆盖

fs.movefile“c:\asd.txt”,“d:\”‘移动

fs.deletefile“c:\asd.txt”‘删除



好了,下一章我们就要学习文件的读写了,文件的读写是文件系统,尤其是黑客编程里面十分重要的一部分,今天打字可能有很多错误,大家看的时候仔细一点,不懂得多看看msdn,要提高水平只有靠自己,别人是帮不了你的

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号