多个绑定多域名的ASP代码_ASP教程

编辑Tag赚U币
教程Tag:暂无Tag,欢迎添加,赚取U币!

推荐:ASP错误代码说明
错误代码 错误消息 说明 ASP0100 Out of memory 内存不足(不能分配要求的内存 ASP0101 Unexpected error 意外错误 ASP0102 Expecting string input 缺少字符串输入 ASP0103 Expe

第一种方法:

如果有有一个ASP空间,而你又想放置多个多个站点,这些代码可以帮到你:

以下为引用的内容:
第一个
<%if Request.ServerVariables("SERVER_NAME")="www.netbei.com" then
response.redirect "zkj"
else
response.redirect "i.htm"
end if%>

第二个
<%
select case request.servervariables("http_host")
case "www.netbei.com" '1
Server.Transfer("v3.htm")
case "www.aspcn.net" '2
Server.Transfer("i.htm")
case "www.netbei.cn" '3
Server.Transfer("netbei.htm")
...... 继续添加 ......
end select
%>

第三个
<%if instr(Request.ServerVariables
("SERVER_NAME"),"kekexi.com")>0 then
response.redirect "index.asp"
else if instr(Request.ServerVariables
("SERVER_NAME"),"4668.com")>0 then
response.redirect "x/index.asp"
else if instr(Request.ServerVariables
("SERVER_NAME"),"web315.com")>0 thenr
esponse.redirect "index3.asp"
end if
end if
end if%>

第四个
<%if Request.ServerVariables("SERVER_NAME")="www.netbei.com" then
response.redirect "index1.asp"
else if Request.ServerVariables("SERVER_NAME")="www.ce.org.cn" then
response.redirect "index2.asp"
else if Request.ServerVariables("SERVER_NAME")="www.163.com" then
response.redirect "index3.asp"
end if
end if
end if%>

以下为引用的内容:

第二种方法:


<%
dim domainname,result
domainname=Request.ServerVariables("SERVER_NAME")
result=right(domainname,12)
if result="my.netbei.com" then
%>
<!--#include file=mynetbei.asp -->
<%
Elseif result="rtisancn.com" then
%>
<!--#include file=artisan.asp -->
<%
Elseif result="gn.netbei.com" then
%>
<!--#include file=web.asp -->
<%
Elseif result=".forwest.com" then
%>
<!--#include file=forwest_com.asp -->
<%
Else
%>
<!--#include file=netbei.asp -->
<%
End if
%>

请作者联系本站,及时附注您的姓名。联系邮箱:mb5u#vip.qq.com(把#改为@)。

分享:ASP基础教程之ASP程序对Cookie的处理
cookie常用来对用户进行识别。 实例: 以下为引用的内容: <% dim numvisits response.cookies("NumVisits").Expires=da

来源:模板无忧//所属分类:ASP教程/更新时间:2008-08-22
相关ASP教程