论坛交流
首页办公自动化| 网页制作| 平面设计| 动画制作| 数据库开发| 程序设计| 全部视频教程
应用视频: Windows | Word2007 | Excel2007 | PowerPoint2007 | Dreamweaver 8 | Fireworks 8 | Flash 8 | Photoshop cs | CorelDraw 12
编程视频: C语言视频教程 | HTML | Div+Css布局 | Javascript | Access数据库 | Asp | Sql Server数据库Asp.net  | Flash AS
当前位置 > 文字教程 > Asp教程
Tag:入门,文摘,实例,技巧,iis,表单,对象,上传,数据库,记录集,session,cookies,存储过程,注入,分页,安全,优化,xmlhttp,fso,jmail,application,防盗链,stream,组件,md5,乱码,缓存,加密,验证码,算法,ubb,正则表达式,水印,,日志,压缩,url重写,控件,函数,破解,触发器,socket,ADO,初学,聊天室,留言本,视频教程

Server.Transfer实现Rewrite模拟生成静态页

文章类别:Asp | 发表日期:2008-11-30 15:55:14

        看到asp的Server.Transfer,用404模拟生成静态页的站的念头重新在我的脑海中浮现出来,现在即使在大的程序,也可以用ASP中的Server.Transfer轻松搞定

<!--#include file="bin/404_Query"-->
< %
select case bin_command
        case "bin"
                server.transfer("bin/web")
        case "uploadfiles"
                server.transfer("bin/send-stream")
        case else
                server.transfer("bin/send-404")
end select
%>
呵呵,说白了,就是根据bin_command来判断到底要实现很么功能,如果为bin则由asp的Server.Transfer移交到到bin/web,然后返回结果,并且能很好的解决URL地址的友好性的问题,实现模式生成静态页的效果。在PHP中没有Rewrite,如果想要URL友好性通常实用PATH_INFO,而本程序由asp的Server.Transfer模拟了PHP中的Path_Info,唯一需要的就是要支持404.asp

bin/404_Query的源代码如下:

< %
Urls=mid(request.querystring,instr(request.querystring,":80")+4)
if instr(Urls,"/")>0 then
        bin_command=left(Urls,instr(Urls,"/")-1)
        getfile=replace(Urls,bin_command&"/","")
else
        bin_command="bin"
end if
%>
这段代码主要是判断bin_command由什么来执行,首先看是否包含二级目录,如果没二级目录,则赋值”bin”(代表程序)
如:demo.com/index5.html,则bin_command=”bin”,通过上边的代码可以知道交给bin/web处理
demo.com/uploadfiles /123456.gif(该文件实际对应的是files/123456.gif),则bin_command=”uploadfiles”,通过上边的代码可以知道交给bin/send-stream处理,send-stream怎么输出files/123456.gif呢。可以参考我以前写的一篇文章 ASP实用BinaryWrite与Adodb.Stream实现下载(http://miaoqiyuan.cn/p/asp-binarywrite-adodb-stream/)
demo.com/111/222,则bin_command=”111″,在select case中没有定义,则是else,交给bin/send-404处理,输出没有找到文件的信息

这样在所有访客(包括:百度,Google)看来,本站都是一个生成静态的页面了。据我所知国内IIS主机有99.9%不支持Isapi_Rewrite,就遇过一次,因为占资源太严重很快就给取消了。

下面是我在ASP学习网上看到的,附在后面,以供参考:
调用 Server.Transfer 方法,立即终止执行第一页并且开始执行第二页。

如果第一页开始写入响应缓冲区, 第二页追加内容到缓冲区而不是替换它。

如果缓冲是打开, 该方法将修改 HTTP 头,除非尚没有内容已被发送.如果 ASP 缓冲关闭, HTTP 头将不修改.

当传输到其他应用程序, 起始页 Application 和 Session 对象将包含应用程序信息中。

示例
下列示例页阐释如何使用 Server.Transfer 方法。
1.

<html>
<body>
<h3>Step 1 - Form Page</h3>
<table border="1">
<tr>
<th>POST</th>
<td>
<form action="page2.asp" method="POST">
<input type="text" name="Name"/>
<input type="submit" value="Submit"/>
</form>
</td>
</tr><tr>
</tr>
<th>GET</th>
<td>
<form action="page2.asp" method="GET">
<input type="text" name="Name"/>
<input type="submit" value="Submit"/>
</form>
</td>

</table>
</body>
</html>
2. 将以下代码作为 ” page2.asp ” (不带引号):

< % @LANGUAGE="VBSCRIPT" %>
<html>
<body>
<h3>Step 2 - Transfer Page</h3>
< %
Select Case UCase(Request.ServerVariables("REQUEST_METHOD"))
Case "POST"
Server.Transfer "page3a.asp"
Case "GET"
Server.Transfer "page3b.asp"
Case Else
Response.Write "An unknown HTTP verb was used."
End Select
%>
</body>
</html>
3. 将以下代码作为 ” page3a.asp ” (不带引号):

< % @LANGUAGE="VBSCRIPT" %>
<h3>Step 3a - POST Results</h3>
<p>Hello < % = Request.Form("Name") %></p>
4. 将以下代码作为 ” page3b.asp ” (不带引号):

< % @LANGUAGE="VBSCRIPT" %>
<h3>Step 3b - GET Results</h3>
<p>Hello < % = Request.QueryString("Name") %></p>
注意: 最后两页是不完整 HTML 页。 这是因为两页都追加到到第二页缓冲区上。

视频教程列表
文章教程搜索
 
Asp推荐教程
Asp热门教程
看全部视频教程
购买方式/价格
购买视频教程: 咨询客服
tel:15972130058