|
| iis如何绑定泛解析的域名 |
| 〖编辑：Cloudy | 浏览：人次〗 |
直接设置主机头即可。例如：a.com
设置主机头www.a.com，默认站点
bbs.a.com，论坛
*.a.com，其他
dns中使用泛域名如.com->aliang->*
解析时就是*.aliang.com
这是你只要在解析到的主机上设置一默认文档index.asp,完成解析即可
附index.asp
<% Response.Buffer=True %>
<%
dim name,targeturl,path,temp
targeturl="http://"
temp=Request.ServerVariables("SERVER_NAME")
name=temp
temp=trim(temp)
temp=split(temp,".")
Dim Conn,dbfile,Rs,SqlStr,DataBaseType
Set Conn=server.CreateObject("ADODB.Connection")
DataBaseType=0
if DataBaseType=1 then
'数据库类型Access2000
'数据库文件位置，使用相对路径
dbfile="Data.mdb"
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &server.Mappath(dbfile)
else
'定义数据库连接
dim server1
dim user1
dim ps
dim Db
dim connstr
server1="192.168.1.100"
user1="sa"
ps="你的密码"
Db="dns"
connstr="Driver={SQL SERVER};SERVER="&server1&";UID="&user1&";PWD="&ps&";Database="&Db
Set Conn=Server.Createobject("ADODB.CONNECTION")
Conn.open connstr
end if
'Recordset
set Rs=server.CreateObject("ADODB.Recordset")
SqlStr = "select * from [DNS] where name='"&temp(0)&"'"
Rs.open SqlStr,Conn,1,1
if Rs.eof=true or Rs.bof then
targeturl=targeturl+"error.asp"
else
targeturl = targeturl+Rs("url")
end if
'if targeturl = "" then
' targeturl="http://www.aliang.com/"
'end if
Rs.close
set Rs=nothing
Response.Write "<script language=javascript>this.location.href='"&targeturl&"'</script>"
%> |
录入时间：2007-08-25 09:50:01 [打印本页]
[关闭窗口]
[返回顶部] |
| 特别声明： 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员，我们尽快予以更正。 |
|
|
