资源描述：
《用asp实现的代码批量修改程序》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、用asp实现的代码批量修改程序>>教育资源库是因工作需要做的一个批量修改代码的小东西，拿出来与大家分享目前可以处理的文件类型：.asp.inc.htm.html具体类型可自行修改添加程序实现的功能：将源目录下的文件批量修改后存到目的目录下用它稍做修改可以实现很多东西噢！别的不说了，代码里面都写的很清楚了<%’//+---------------------------------------------------------------------------+’//
2、程序名称：他山之石代码批量修改器v1.01
3、’//
4、他山
5、之石版权所有，侵权必究！转载请注明版权：）
6、’//
7、-------------------------------------------------------------------------
8、’//
9、系统:eOut=500’脚本超时时间’//+---------------------------------------------------------------------------+’//
10、批量修改函数
11、’//
12、----------------------------------------------------
13、---------------------
14、’//
15、属性：path_from源文件目录path_to目标文件工作目录
16、’//
17、-------------------------------------------------------------------------
18、’//
19、返回值：无
20、’//
21、-------------------------------------------------------------------------
22、’//
23、程序流程：......
24、’//
25、------------------------
26、-------------------------------------------------
27、’//
28、编写者:idfile(path_from,path_to)list_from=path_from’储存当前源工作目录list_to=path_to’储存当前目标工作目录Setfso=CreateObject("Scripting.FileSystemObject")SetFold=fso.GetFolder(list_from)’获取Folder对象Setfc=Fold.Files’获取文件记录集Setmm=Fold.SubF
29、olders’获取目录记录集ForEachf2inmmsetobjfile=server.createobject("scripting.filesystemobject")objfile.CreateFolder(path_to""f2.name)’创建目录midfilepath_from""f2.name,path_to&n12下一页>>>>这篇文章来自..，。bsp;""f2.name’递归调用response.p;""f2.name"完毕！<br>"NextForEachf1infcfile_from=l
30、ist_from""f1.name’生成文件地址(源)file_to=list_to""f1.name’生成文件地址(到)fileExt=lcase(right(f1.name,4))’获取文件类型IffileExt=".asp"orfileExt=".inc"orfileExt=".htm"orfileExt="html"Then’具体类型可自行修改添加setobjfile=server.createobject("scripting.filesystemobject")’定义一个服务器组件（读取源文件）setout=objf
31、ile.opentextfile(file_from,1,false,false)content=out.readall’读取数据out.close’//+---------------------------------------------------+’//
32、文件内容处理模块（主要，其他都是文件操作）
33、SetregEx=Neobject")’定义一个服务器组件（写入目标文件）setoutt=objfile.createtextfile(file_to,TRUE,FALSE)outt.Object")fso.CopyFilef
34、ile_from,file_toEndIfNextEndSubmidfileServer.mappath("temp/aaa"),Server.mappath("temp/bbb")’调用示例源目录temp/aaa处理后存到temp/
