泛解析,二级域名转向问题- -

上一篇 / 下一篇  2007-04-26 11:14:42 / 个人分类:ASP

                                     

)l4Tf x3][.x0

?`5r'[b0

!bEW-Ni)v~a0关于实现商务网站二级域名的应用`!51Testing软件测试网h(|4_7b*oc
51Testing软件测试网#s9bxm"R9zN'j;{
实现条件:
AA [L:J4^QpU01、必须有一个顶级域名,而且此域名必须做好泛解析并做好指向。51Testing软件测试网7Rj%_iul
2、必须有一独立的web服务器 。泛解析的域名指向该服务器。51Testing软件测试网"@g/WG9H.r7Ue
3、在web服务器上 建一个空的主机头名的web站点。51Testing软件测试网*w^ W CwX:Y7}
4、做域名转向51Testing软件测试网]^*d q7cy^t.d

n*Y)Fh3TZL0什么是域名泛解析?51Testing软件测试网1p:cDf_~[c;e!]9L*p
       客户的顶级域名abc.com,之下所设的*.abc.com全部解析到同一个IP地址上去。比如客户设b.abc.com就会自已自动解析到与abc.com同一个IP地址上去,显示的是跟abc.com一样的页面。
_5o7U/w fc8q0目的是让用户可以注册abc.com为后缀虚拟三级域名系统(也可以称为免费域名)。

`)Nv!F,xqU0

,^8_0~6_9y X*L0实现:51Testing软件测试网y PP%yU&E1s
       进入DNS51Testing软件测试网,k9ap([(CJ#w4S(O
       打开要做泛解析的域 (abc.com)51Testing软件测试网c1SQQ~G
       建立新域 名字为 *
$r.[)BzD0       进入这个域建立一个空主机 只输入 服务器的IP
lpXrR0Kk0      OK~!
+Gj;|Dtnt0

)|+AqP9y0实现了泛解析就表示以后 *.abc.com的访问都会到 指定的WEB服务器上去,现在要做的就是做域名转向51Testing软件测试网)s @ cCs

51Testing软件测试网XI!_ s$F0s;O6T

<!-- #include file="conn/conn.asp" -->
S]&z#br0<%
d4L z,n}2i8Fi0tURL = Request.ServerVariables("HTTP_HOST")        '请求页面的地址51Testing软件测试网-uWM0f1Ct"{gvU+Q
dURL = left(turl,instr(tURL,".")-1)                               '二级域名名字
z;]4eQ"X*A\U5~-Iu0sURL = dURL&"."51Testing软件测试网a1^h&p I*J}W%h~
sURL = replace(tURL,""&sURL&"","")                         '顶级域名,也即abc.com

M"S[Y"u6E]7A051Testing软件测试网W/kD'H/M0_X

If dURL="www" or durl="" then51Testing软件测试网!ep YE/sw9hU)R
    Response.Redirect("默认首页")51Testing软件测试网_!A-gQq0V H$@NC
    Response.End()
4n9y/M x h~` G wn/Yh0Else51Testing软件测试网/K9U3q%M+ug/J
   Set rs = conn.execute("select id,username from [register] where username='"&dURL&"'")51Testing软件测试网 cE$]3Dwn N5cU#v
   If   rs.eof and rs.bof then51Testing软件测试网 n2Z7c? phAm UJ#Y
       response.Redirect("默认首页")51Testing软件测试网#Dy iF N
       response.End()
i$d+O0jg9Mb0   Else
dj/O3}mu XF0    url= ""       '此处url 为二级域名访问的路径
Hr6fQy t0     rs.close51Testing软件测试网7iv] t%_ E2E
    Set rs = nothing
*z9\#zs2rR0%>51Testing软件测试网7`EmI&F:q

51Testing软件测试网z6t4e5f-| f r$]

51Testing软件测试网-S `.J`cn
<HTML>
z1jj? I5R.]0<HEAD>51Testing软件测试网D/P_I&mNF
<META http-equiv="Content-Type" content="text/html; charset=gb2312">51Testing软件测试网;k-O4`hv$ch`F/l
<META CONTENT="text/html; CHARSET=UTF-8" HTTP-EQUIV="Content-Type">51Testing软件测试网2^Y"a*^(X ~%tU O1p
<TITLE>LD160兰德网</TITLE>51Testing软件测试网O4?9`9C&x7L k
</HEAD>
C:\5p^?O3}uC0<frameset frameborder="0" framespacing="0" scrolling="no" border="0" marginheight="0" marginwidth="0" rows="0,*">
.T2w N-C q0<frame scrolling="NO" noresize="0" marginwidth="0" marginheight="0" framespacing="0" frameborder="0" target="main" name="main1" SRC="about:blank">51Testing软件测试网E g,DU*`

*y2C9S b5P0L0<frame scrolling="yes" noresize="0" marginwidth="0" marginheight="0" framespacing="0" frameborder="0" target="main1" name="main1" SRC="<%=url%>">

3RT&{/M } Rs ] }:p051Testing软件测试网6R3g8D~S6S%qs ZY

<noframes>51Testing软件测试网3k5c x:n;GT|
<body>
5w,ii~ Hz&Xaa$g0<p>This page uses frames, but your browser doesn't support them.</p></body>51Testing软件测试网ni-xX2?
</noframes>51Testing软件测试网+k5ZW4I5?#[,O
</frameset>51Testing软件测试网p{4Z!~k:r IR
</HTML>51Testing软件测试网 [IH;r4V*etA
<%
7s0p5i7E$B0   end if51Testing软件测试网{Y3\U}L+Mz7{
   end if51Testing软件测试网W(S NEu/s^ Q
%>51Testing软件测试网Qcvt gO H
51Testing软件测试网 jZz*K0r6eI
把上面的代码存为index.asp放在WEB服务器的默认站点上就ok

3Rm2_ i#B+GTS[ _051Testing软件测试网c ]n5g%v])WAoH

关键的地方就是frameset 框架的使用,目的是让地址栏始终显示的是二级域名地址。51Testing软件测试网'q1|| uq IL0Q*Z Q


TAG: ASP

 

评分:0

我来说两句

Open Toolbar