推荐:ASP错误代码说明错误代码 错误消息 说明 ASP0100Out of memory 内存不足(不能分配要求的内存ASP0101 Unexpected error 意外错误 ASP0102Expecting 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 %> |
请作者联系本站,及时附注您的姓名。联系邮箱:CuoXIn#vip.qq.com(把#改为@)。
分享:ASP基础教程之ASP程序对Cookie的处理cookie常用来对用户进行识别。实例: 以下为引用的内容: <%dim numvisitsresponse.cookies(NumVisits).Expires=da