不同域名访问同一网站引导跳转到指定的相关页面
【以稿换稿 】 作者:佚名 发布:2016年06月22日 阅读: 次
<%
Dim StrDomain
StrDomain=Request.ServerVariables("SERVER_NAME")
'获得包含域名的字符串
select case StrDomain
case "www.msgz.org"
Response.redirect "http://www.msgz.org/"
case "msgz.org"
Response.redirect "http://www.msgz.org/"
case "www.wmjy.cn"
Response.redirect "http://www.msgz.org/"
case "wmjy.cn"
Response.redirect "http://www.msgz.org/"
case else
Response.write "请直接刷新即可访问!或者在地址栏中输入完整地址:http://www.msgz.org/Index.html"
end select
%>
【来源:互联网络】
- 上一篇:如何做网页鼠标经过图片变换移开n秒后恢复图像
- 下一篇:五十八种网络故障及其解决办法
用户评论
(以下评论仅代表网友意见,与本站立场无关)