Discuz!官方免费开源建站系统

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索

[已解决] 虚拟主机的uch也能给用户提供二级域名了!我成功了!!!

[复制链接]
 楼主| sunyingchao 发表于 2009-6-6 16:50:07 | 显示全部楼层
关于二级域名的解析,设置.......
回复

使用道具 举报

流浪情人 发表于 2009-6-6 20:42:55 | 显示全部楼层
好东西啊 呵呵谢谢哦
回复

使用道具 举报

 楼主| sunyingchao 发表于 2009-6-7 16:09:56 | 显示全部楼层
好贴。。。  
    
又见好帖。。。 别人说的,转述一下~~呵呵
回复

使用道具 举报

 楼主| sunyingchao 发表于 2009-6-10 15:14:09 | 显示全部楼层
打个招呼嘿嘿
回复

使用道具 举报

黑色の恋 发表于 2009-6-11 01:50:44 | 显示全部楼层
先占个位置...
回复

使用道具 举报

 楼主| sunyingchao 发表于 2009-6-13 14:26:47 | 显示全部楼层
呵呵,好贴!!那么多朋友支持哈,嘿嘿
回复

使用道具 举报

站长助理 发表于 2009-6-13 14:31:40 | 显示全部楼层
很好!!!!!!!!!!!!
回复

使用道具 举报

 楼主| sunyingchao 发表于 2009-6-15 18:09:40 | 显示全部楼层
使用二级域名,体验方便快捷呵呵
回复

使用道具 举报

 楼主| sunyingchao 发表于 2009-6-16 14:17:47 | 显示全部楼层
多谢大家支持哈呵呵
回复

使用道具 举报

 楼主| sunyingchao 发表于 2009-6-18 14:18:27 | 显示全部楼层
实现无限二级域名的功能必须要有独立服务器,虚机是不行的,另外还需将域名解析指向服务器,并将主机头设为空,以下是ASP写的代码,仅供参考:
<%
from=lcase(trim(Request.ServerVariables("HTTP_HOST")))
if from="www.io365.com" then
response.Write( "<frameset><frame src=""index.htm""></frameset>")

elseif from="io365.com" then
response.Write( "<frameset><frame src=""index.htm""></frameset>")

elseif from="www.io365.com.cn" then
response.Write( "<frameset><frame src=""index.htm""></frameset>")

elseif from="www.io365.net" then
response.Write( "<frameset><frame src=""index.htm""></frameset>")

elseif from="kingbaobao.com" then
response.Write( "<frameset><frame src=""baobao/index.asp""></frameset>")

elseif from="www.kingbaobao.com" then
response.Write( "<frameset><frame src=""baobao/index.asp""></frameset>")

elseif left(from,8)="beijing." then
response.Write( "<frameset><frame src=""BeiJing/index.asp""></frameset>")

elseif left(from,10)="guangdong." then
response.Write( "<frameset><frame src=""GuangDong/index.asp""></frameset>")

elseif left(from,9)="shanghai." then
response.Write( "<frameset><frame src=""ShangHai/index.asp""></frameset>")

else
if Instr(from,".io365.com")>0 then
ufrom=Replace(from,".io365.com","")
else
ufrom=Replace(from,".kingbaobao.com","")
end if
sql="select ID from user where uurl='"&ufrom&"'"
set rsy= Server.CreateObject( "ADODB.recordset" )
rsy.Open sql,conn,1,1
if not rsy.eof then
response.Write( "<frameset><frame src=""baobao/index.asp?hyid="&rsy("ID")&"""></frameset>")
else
response.Write("天天上网提醒您:["&from&"]该域名不能打开,请选择其它地址重试!")
'Response.Redirect "index1.htm"
end if
rsy.close
end if
%>
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|Discuz! 官方站 ( 皖ICP备16010102号 )star

GMT+8, 2024-12-27 04:29 , Processed in 0.027606 second(s), 3 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

Copyright © 2001-2023, Tencent Cloud.

快速回复 返回顶部 返回列表