ASP编程：一个用ASP天生html的新办法
我想详细了解ASP整站代码与PSP整站代码有什么优缺点，那个更好，更安全，更用容易维护，和管理。。。今朝已有良多天生html的旧事体系，可是都是用的模板，本函数完成把asp页面发生的html代码保留成为一个html文件，如许就没有需要修改本来的页面就能够轻松完成一个天生html的旧事体系了。^_^因为代码对照短，这里就不举行正文了<%
当方针页面的包括文件即#include的页面里边存在response.End()的时分本程序有成绩
注重：本文件必定要放在filename指向的文件的统一目次下
dimhughchiu_rtcode
Functionget_exe_code(filename)
dimexecode
dimtmp_str
Dimre,re1,content,fso,f,aspStart,aspEnd
dimms,m
execode=""
setfso=CreateObject("Scripting.FileSystemObject")
setf=fso.OpenTextFile(server.mappath(filename))
content=f.ReadAll
f.close
setf=nothing
setfso=nothing
setre=newregexp
re.ignorecase=true
re.global=true
re.pattern="<\%@[^\%]+\%>"
content=re.replace(content,"")
re.global=false
re.pattern="<!--s*#includes*files*=s*""([^""]+)""s*-->"
do
setms=re.execute(content)
ifms.count0then
setm=ms(0)
tmp_str=get_exe_code(m.submatches(0))
content=re.replace(content,tmp_str)
else
exitdo
endif
loop
setm=nothing
setms=nothing
re.pattern="^s*="
aspEnd=1
aspStart=inStr(aspEnd,content,"<%")+2
setre1=newRegExp
re1.ignorecase=true
re1.global=false
re1.pattern="response.Write(.+)"
dowhileaspStart>aspEnd+1
execode=execode&vbcrlf&"hughchiu_rtcode=hughchiu_rtcode&"""&replace(replace(Mid(content,aspEnd,aspStart-aspEnd-2),"""",""""""),vbcrlf,"""&vbcrlf&""")&""""&vbcrlf
aspEnd=inStr(aspStart,content,"%>")+2
tmp_str=Mid(content,aspStart,aspEnd-aspStart-2)
do
setms=re1.execute(tmp_str)
ifms.count0then
setm=ms(0)
tmp_str=re1.replace(tmp_str,"hughchiu_rtcode=hughchiu_rtcode&"&m.submatches(0))
else
exitdo
endif
loop
setm=nothing
setms=nothing
execode=execode&re.replace(tmp_str,"hughchiu_rtcode=hughchiu_rtcode&")
aspStart=inStr(aspEnd,content,"<%")+2
loop
setre1=nothing
setre=nothing
execode=execode&vbcrlf&"hughchiu_rtcode=hughchiu_rtcode&"""&replace(replace(Mid(content,aspEnd),"""",""""""),vbcrlf,"""&vbcrlf&""")&""""&vbcrlf
get_exe_code="<%"&execode&"%>"
EndFunction
functionasp2html(filename)
dimcode
code=replace(replace(replace(get_exe_code(filename),"hughchiu_rtcode=hughchiu_rtcode&"""""&vbcrlf,""),"<%",""),"%>","")
response.Write(code)
execute(code)
response.Write(hughchiu_rtcode)
asp2html=hughchiu_rtcode
endfunction
%>
利用典范：
setfso=CreateObject("Scripting.FileSystemObject")
setf=fso.CreateTextFile(server.mappath("youpage.htm"),true)
f.WriteLine(asp2html("youpage.asp"))
f.close
setf=nothing
setfso=nothing
但愿这个函数对人人有点用，因为程度无限，有错的中央请人人指出，并但愿能加以改善。
ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用 掌握asp的特性而且一定要知道为什么。 先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习 下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助... ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点，理论上可以使用任何编程语言包括C++,VB,JS等等，当然，最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)，它可以看作是VC和Java的混合体吧。 虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。 跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组 你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。
页:
[1]