最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp文件目录与文件拷贝
时间：2022-07-02 23:17:43 编辑：袖梨 来源：一聚教程网
asp文件目录与文件拷贝,这是我在写一个系统升级时用到了,就是把当前文件夹中的文件自制到系统目录下,替换以前的旧文件
sub fs()
set fsobject=server.CreateObject("scripting.filesystemobject")
end sub
sub install()
call fs()
set folder=fsobject.getfolder(server.mappath("."))
response.write("Installation documentation is complete,Installation of the following documents
")
for each fd in folder.files
fname=server.MapPath("./"&fd.name)
path2=server.MapPath("../"&fd.name)
for b=0 to 20
response.flush()
next
call copyfiles(fname,path2)
for s=0 to 10
response.flush()
next
next
end sub
sub copyfiles(path,path2)
set mycopy=fsobject.getfile(path)
response.flush()
mycopy.copy path2
response.write("installed success ! "&path2&"
")
response.Flush()
end sub
调用时就.
call install()
call append()
response.Flush()
这样就行了
原创文章:转载请注明:
相关文章
- 漫蛙manwa2无删减版-漫蛙manwa2完整未删减 02-28
- 羞羞漫画sss漫画免费登录-羞羞漫画首页登录入口全免费 02-28
- 识别真假Z-Library-获取正版电子书下载链接 02-28
- 51漫画官网在线入口-海量正版漫画免费看无广告极速加载 02-28
- 漫蛙manwa2漫画-漫蛙manwa2漫画站 02-28
- 推特网页版在线秒开-推特网页版一键登陆 02-28