您现在的位置： 设计龙 >> 网络编程 >> asp教程 >> 正文

一个二级域名实现最基本的例子

Author:admin Link:www Hits: Update:2006-8-31 20:27:30
天极网摘 ViVi收藏夹 365Key 和讯网摘 POCO网摘

<% dim temp1, temp2, temp3
temp1 = Request.ServerVariables("HTTP_HOST")
temp2 = Right(Request.ServerVariables("HTTP_HOST"),14) '其中14表示你的域名去掉前辍后剩下的字符数.如下面的 ".yaojerry.name" 不包括引号,一样是14个字符.
temp3 = Replace(temp1,temp2,"")
%>
<%if temp3 <> "www" and temp3 <> "blog" then
Response.Redirect "http://www.yaojerry.name/blog/blog.asp?name=" & temp3 %>
<%end if%>

存到inc目录下 test.asp (文件名可以随便取)
在index.asp文件的"<!--#include file="conn.asp"-->"后加上下面这句.
<!--#include file="inc/test.asp"-->

另外需要iis的服务器设一个空的http头

   
  • 上一篇文章：
  • 下一篇文章：
    • [回到标题] [回到顶部]