[心缘地方]同学录
首页 | 功能说明 | 站长通知 | 最近更新 | 编码查看转换 | 代码下载 | 常见问题及讨论 | 《深入解析ASP核心技术》 | 王小鸭自动发工资条VBA版
登录系统:用户名: 密码: 如果要讨论问题,请先注册。

[ASP备忘]【xxx.com开始的网址】自动转向到【www.xxx.com对应的网址】的ASP代码

上一篇:[.net]反编译工具,Reflector for .NET
下一篇:[备忘]超帅的JS框架……

添加日期:2007/11/17 18:22:11 快速返回   返回列表 阅读3670次
写在top页、conn页之类的共通文件中……


<%
host = Request.ServerVariables("SERVER_NAME")
if Lcase(host)="xxx.com" then
       aa = Request.ServerVariables("SCRIPT_NAME")
       bb = Request.ServerVariables("QUERY_STRING")
       if bb<>"" then
              response.redirect "http://www.xxx.com" & aa & "?" & bb
       else
              response.redirect "http://www.xxx.com" & aa
       end if
end if
%>



没加端口的判断,比如xxx.com:8080,这个8080……
网址最后如果有锚点,如xxx.com/aaa/bb.asp#aa,锚点会丢失的。

一般用用还是凑合的。
 

评论 COMMENTS
没有评论 No Comments.

添加评论 Add new comment.
昵称 Name:
评论内容 Comment:
验证码(不区分大小写)
Validation Code:
(not case sensitive)
看不清?点这里换一张!(Change it here!)
 
评论由管理员查看后才能显示。the comment will be showed after it is checked by admin.
CopyRight © 心缘地方 2005-2999. All Rights Reserved