asp+文件操作的问题

[pxn]

我想把一个文件从一个文件夹剪切到另一个文件夹下怎么做？
另外有一格字符串 “/doc/filepath/”
我用什么函数把"filepath"替换成另一个字符串

[wangyingdong]

用FSO组件,可以实现的

[huangleibo]

.NET类库的文件ＩＯ中似乎没有剪切功能的函数，应该先复制一份，然后把旧的文件目录给Ｄｅｌｅｔｅ，要不然改个名做备份也行，大家说对吧？呵呵。

[kkkbs]

现在一般的空间都支持FSO..一般怎么限制只能操作本级目录的权限?
包括父.子目录均不可操作

[笨笨兔兔兔兔兔]

.net的类库就不清楚了

不过FSO是用copy和delete实现的

[kendo7]

dim myfile
set myfile=server.CreateObject("scripting.filesystemobject")
dim source_folderpath,destination_folderpath
source_folderpath=server.mappath("folderpath")
'''''''''''''copy file
myfile.copyfolder source_folderpath,destination_folderpath
'''''''''''''delete
'myfile.deletefolder source_folderpath,true

[coolwindkaka]

替换函数用split切出来就行了，剪切文件夹就不会了，学习ING。。。

[river6023]

fso组建中有剪切文件夹的功能吧
替换路径应该不是很难的吧

[ffyd2000]

剪切目录ASP中好像没有这样的函数，你需要自己写函数。很简单的，就是在新的地方照原来的目录结构建目录，然后把文件都拷过去。再把原来目录的文件删除就行了

[pxn]

替换怎么替换阿？

[goodstuday]

'-----------------------文件移动函数----
Function FileMove(strFileSource,strFileDestination)
IF strFileSource = "" or isnull(strFileSource) Then
Response.Write("原文件路径不能为空！")
Response.End
End IF
IF strFileDestination = "" or isnull(strFileDestination) Then
Response.Write("目的路径不能为空")
Response.End
End IF
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists(strFileSource) Then
fso.MoveFile strFileSource, strFileDestination
FileMove="Y"
Else
Response.Write("该文件不存在！")
Response.End
End If
Set fso = Nothing
End Function

问题二：用Replace函数替换
str="/doc/filepath/"
new_str=Replace(str,"filepath","替换成另外的字符")

[goodstuday]

不好意思，看错楼主意思了。
剪切文件夹， kendo7() 已经给出答案了

我上面那个是移动单个文件