您当前的位置是:首页-ASP教程

ASP利用404错误实现自动生成静态页面

【发表于】:2010/10/20 22:11:00  已被访问:167次

介绍一个asp伪静态的程序实现方法


链接地址采用如下规则


hxxp://www.xxx.com/weblog/article.asp?/< %=rs("id")% >.html


文章页面读取时采用如下代码获得文章ID



server_v40=Request.ServerVariables(“QUERY_STRING”)


id=Int(replace(replace(server_v40,”/”,”"),”.html”,”"))



另一好方法:利用404错误转向来实现


比如网站地址都为 hxxp://www.xxx.com/weblog/article.asp?id=310


写程序时候写成 hxxp://www.xxx.com/weblog/article/310.html
其实并不存在 hxxp://www.xxx.com/weblog/article/310.html这个页面


用户要点击这个超连接的话,就会自动调用404错误页面


只要把404错误页面定义为asp页面就可以了。


其中加入获得 article.asp?id=310页面的id 310,然后利用程序 获取该页面的内容并显示


Domain=Request.ServerVariables(“HTTP_HOST”)
sourceUrl=Request.ServerVariables(“QUERY_STRING”)
URL=Replace(sourceUrl,”404;http://”&Domain,”")


filename=URL


func =Replace(URL,”/”,”",InstrRev(URL,”/”),1)


func=mid(func,1,4)
If func=”inde” Then
requerUrl=Replace(URL,”.html”,”.asp”)
ElseIf func =”list” Then
requerUrl=Replace(URL,”.html”,”")
requerUrl=Replace(requerUrl,”/”,”",1,1)
requerUrl=Replace(requerUrl,”_”,”.asp?classid=”,1,1)
requerUrl=Replace(requerUrl,”_”,”&page=”,1,1)
ElseIf func =”view” Then
requerUrl=Replace(URL,”.html”,”")
requerUrl=Replace(requerUrl,”/”,”",1,1)
requerUrl=Replace(requerUrl,”_”,”.asp?id=”,1,1)
requerUrl=Replace(requerUrl,”_”,”&page=”,1,1)
End If
requerUrl =”http://” + Domain + requerUrl
filename=server.mapPath(filename)
getHTTPPage requerUrl,filename ‘根据请求生成静态页面


response.Redirect(sourceUrl)

No related posts.

 
上下篇: 用缓存进行判断是否要生成新的HTML ASP生成静态Html文件技术杂谈

最新推荐信息