| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 881 人关注过本帖
标题:[求助]删除文件夹的代码怎么写?
只看楼主 加入收藏
知难而进
Rank: 1
等 级:新手上路
帖 子:20
专家分:0
注 册:2005-6-2
结帖率:0
收藏
 问题点数:0 回复次数:4 
[求助]删除文件夹的代码怎么写?

删除指定的文件夹用什么代码啊?

我想通过窗体删除系统中某个文件夹,但不知代码怎么写,高手帮帮我啊。

搜索更多相关主题的帖子: 文件夹 代码 删除 系统 
2006-06-16 20:24
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1216
专家分:1376
注 册:2005-3-14
收藏
得分:0 

Sub DeleteAFolder(fpath)
Dim fsodelford
Set fsodelford = CreateObject("Scripting.FileSystemObject")
fsodelford.DeleteFolder(fpath)
response.write "<font size=2 color=#ff0000>删除文件夹成功!</font>"
End Sub

参数FPATH是指定的绝对路径,如:“c:\123”


http://toorup.3v.do
loading...
2006-06-16 21:49
知难而进
Rank: 1
等 级:新手上路
帖 子:20
专家分:0
注 册:2005-6-2
收藏
得分:0 

谢谢版主的回复,代码如果全部用上的话会出现差错,不知什么原因。

我用了下面两句代码成功了

Dim fsodelford
Set fsodelford = CreateObject("Scripting.FileSystemObject")
fsodelford.DeleteFolder(fpath)


2006-06-16 22:45
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1216
专家分:1376
注 册:2005-3-14
收藏
得分:0 

全部是写成一个函数好调用的,
呵呵


http://toorup.3v.do
loading...
2006-06-16 23:16
知难而进
Rank: 1
等 级:新手上路
帖 子:20
专家分:0
注 册:2005-6-2
收藏
得分:0 

谢谢版主


2006-06-17 22:02
快速回复:[求助]删除文件夹的代码怎么写?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034090 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved