仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 506|回复: 8
打印 上一主题 下一主题

[学习教程] ASP网页编程之用asp完成的代码批量修正程序

[复制链接]
若天明 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:57:11 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
由于ASP提供的是一对多的服务,所以用户的一些特殊需求很难得到满足。程序
用asp完成的代码批量修正程序,fso相干
是因事情必要做的一个批量修正代码的小器材,拿出来与人人分享
今朝能够处置的文件范例:.asp.inc.htm.html详细范例可自行修正增加
程序完成的功效:将源目次下的文件批量修正后存到目标目次下
用它稍做修正能够完成良多器材噢!
其余不说了,代码内里都写的很分明了
<%
//+---------------------------------------------------------------------------+
//|程序称号:参考之资代码批量修正器v1.01|
//|参考之资版权一切,侵权必究!转载请说明版权:)|
//|-------------------------------------------------------------------------|
//|体系:win2000;编纂器:EditPlus;缩进工具:Tab;缩进长度:8;字体:宋体(10pt);|
//|-------------------------------------------------------------------------|
//|创立者:WYC;创立工夫:2004-03-08;|
//|编写者:WYC;编写工夫:2004-03-08;|
//+---------------------------------------------------------------------------+
Server.ScriptTimeOut=500剧本超不时间
//+---------------------------------------------------------------------------+
//|批量修正函数|
//|-------------------------------------------------------------------------|
//|属性:path_from源文件目次path_to方针文件事情目次|
//|-------------------------------------------------------------------------|
//|前往值:无|
//|-------------------------------------------------------------------------|
//|程序流程:......|
//|-------------------------------------------------------------------------|
//|编写者:WYC;编写工夫:2004-03-08;|
//+---------------------------------------------------------------------------+
Submidfile(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.SubFolders猎取目次纪录集
ForEachf2inmm
setobjfile=server.createobject("scripting.filesystemobject")
objfile.CreateFolder(path_to&""&f2.name)创立目次
midfilepath_from&""&f2.name,path_to&""&f2.name递回挪用
response.writepath_to&""&f2.name&"终了!<br>"
Next
ForEachf1infc
file_from=list_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=objfile.opentextfile(file_from,1,false,false)
content=out.readall读取数据
out.close
//+---------------------------------------------------+
//|文件内容处置模块(次要,其他都是文件操纵)|
SetregEx=NewRegExp
regEx.Pattern="(>s*
)"
regEx.Global=true设置全体婚配形式
content=regEx.Replace(content,">")交换失落回车符
content=Replace(content,"","")作tab交换
//+---------------------------------------------------+
setobjfile=server.createobject("scripting.filesystemobject")界说一个服务器组件(写进方针文件)
setoutt=objfile.createtextfile(file_to,TRUE,FALSE)
outt.write(content)写进数据
outt.close
else不然间接复制文件
Setfso=CreateObject("Scripting.FileSystemObject")
fso.CopyFilefile_from,file_to
EndIf
Next
EndSub
midfileServer.mappath("temp/aaa"),Server.mappath("temp/bbb")挪用示例源目次temp/aaa处置后存到temp/bbb
源目次目标目次(必需是已存在的目次)
%>

对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了,
因胸联盟 该用户已被删除
沙发
发表于 2015-1-20 06:32:21 | 只看该作者
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
若天明 该用户已被删除
板凳
 楼主| 发表于 2015-1-24 09:49:28 | 只看该作者
ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。
灵魂腐蚀 该用户已被删除
地板
发表于 2015-1-31 22:53:35 | 只看该作者
ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。
小妖女 该用户已被删除
5#
发表于 2015-2-7 01:10:13 | 只看该作者
学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
分手快乐 该用户已被删除
6#
发表于 2015-2-19 06:07:21 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
飘灵儿 该用户已被删除
7#
发表于 2015-3-6 13:28:18 | 只看该作者
没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。
再现理想 该用户已被删除
8#
发表于 2015-3-13 01:09:39 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
若相依 该用户已被删除
9#
发表于 2015-3-20 08:46:50 | 只看该作者
我们必须明确一个大方向,不要只是停留在因为学而去学,我们应有方向应有目标.
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-23 06:05

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表