3个回答
展开全部
首先,创建文件系统对象,即filesystemobject,然后使用此对象的方法来创建
实例
对于本题:
set fso=createobject("scripting.filesystemobject")
'创建文件系统对象fso
set f=fso.createfolder("c:\test")
'用文件系统对象fso的方法createfolder,创建文件夹c:\test
'并将返回的文件夹对象c:\test,赋给f,从而得到文件夹对象的一个实例
'后面可以对此对象进行引用,如想得到其大小,可用f.size
MsgBox "去看看吧,文件夹10秒后会被删除"
createobject("wscript.shell").run "c:\"
wsh.sleep 10000
fso.deletefolder("c:\test")
'对于文件、文件夹的删除操作,由于被删除了,也就无法再建立连接了
'且它也没有返回值,无法将它赋给变量
看看能不能看懂
实例
对于本题:
set fso=createobject("scripting.filesystemobject")
'创建文件系统对象fso
set f=fso.createfolder("c:\test")
'用文件系统对象fso的方法createfolder,创建文件夹c:\test
'并将返回的文件夹对象c:\test,赋给f,从而得到文件夹对象的一个实例
'后面可以对此对象进行引用,如想得到其大小,可用f.size
MsgBox "去看看吧,文件夹10秒后会被删除"
createobject("wscript.shell").run "c:\"
wsh.sleep 10000
fso.deletefolder("c:\test")
'对于文件、文件夹的删除操作,由于被删除了,也就无法再建立连接了
'且它也没有返回值,无法将它赋给变量
看看能不能看懂
展开全部
Dim fso
Set fso = CreateObject("scripting.filesystemobject")
fso.CreateFolder "path&name"
fso.DeleteFolder "path&name",ture 'ture 参数表示强制删除
Set fso = CreateObject("scripting.filesystemobject")
fso.CreateFolder "path&name"
fso.DeleteFolder "path&name",ture 'ture 参数表示强制删除
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
fso.deletefolder("d:\a")
fso.createfolder("d:\a")
fso.createfolder("d:\a")
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询