推荐: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