最新下载
热门教程
- 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()
本站原创转载注明
相关文章
- 三国天下归心护卫点杀队玩法详解 07-30
- DOTA2 7.38版本伐木机改动内容详析 07-30
- 崩坏星穹铁道光锥直到明天的明天是什么属性 07-30
- 明日方舟终末地汤汤最强队伍搭配方法 07-30
- 城门血战 全新策略肉鸽塔防游戏试玩 07-30
- 城门血战：肉鸽塔防新体验 07-30