最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 文件自动复制 文件移动 安装程序
时间:2022-07-02 23:01:23 编辑:袖梨 来源:一聚教程网
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()
本站原创转载注明 www.111com.net
相关文章
- PS中如何设置中间调变化效果 PS设置中间调变化效果教程 07-03
- 雾锁王国武器恐厄怎么获取 雾锁王国武器恐厄获取方法 07-03
- JSP实现分页效果 07-03
- 桥水基金创办人:思考鉅额政府债务和赤字时最重要的原则 07-03
- 绝区零乐于助人奖章四通过什么方式获取 绝区零乐于助人奖章四获取方式汇总 07-03
- 大侠立志传猎户的请求怎么完成通关 大侠立志传猎户的请求通关技巧大全 07-03