脚本宝典收集整理的这篇文章主要介绍了ASP应用之模板采用,脚本宝典觉得挺不错的,现在分享给大家,也给大家做个参考。初学ASP,程序是能勉强写出来了,但若每进行一次网站页面的改版,所有的源程序都将进行一次移植手术。为此所耗费的人力精力不计其数,甚至一不小心得不偿失、前功尽弃。
<% set conn= Server.CreateObject("ADODB.Connection") connstr = "PRovider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("testmb.mdb") conn.Open connstr %> |
<% dim topcode sub cntop() topcode="现在时间是:" topcode=topcode&now() end sub dim leftcode,i sub cnleft() for i = 1 to 5 leftcode=leftcode&"<p>cnbruce.COM" next end sub dim rightcode sub cnright() for i = 1 to 9 rightcode=rightcode&"<hr color="&i&i&i&i&i&i&">" next end sub %> |
<!--#include file="conn.asp" --> <!--#include file="lib.asp" --> <% SQL="select * From moban where m_id=1" set rs=Server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 mb_code=rs("m_html") rs.close set rs=nothing cntop() mb_code=replace(mb_code,"$cntop$",topcode) cnleft() mb_code=replace(mb_code,"$cnleft$",leftcode) cnright() mb_code=replace(mb_code,"$cnright$",rightcode) response.write mb_code %> |
以上是脚本宝典为你收集整理的ASP应用之模板采用全部内容,希望文章能够帮你解决ASP应用之模板采用所遇到的问题。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。