网络编程
当前位置:主页>>资讯中心>>网络编程>>详细内容

会员生成二级域名

点击次数:3813 发布时间:2015-09-23 17:04:33    
八五互联
八五互联-西部互联网第一品牌!专业提供网站建设,网站优化,网络推广,短信群发,域名注册,虚拟主机,主机托管,主机租用,独立主机,VPS主机,云主机,企业邮箱等服务!

<%
Dim hostname
hostname=Request.ServerVariables("SERVER_NAME")
hostname=Replace(hostname,"www.","")                 '去掉前面的www
if Instr(hostname,"ip00.cn")<2 then                  '判断域名中包含xxx.com则正常显示网站,否则其他域名均显示以下文字提示
response.write "必须是二级域名才可以"                '防止aspbc.com这个域名进入
Response.end
end if
username=Split(hostname,".")(0)                      '得到用户名
username=Replace(Replace(username,"'",""),";","")    '过滤掉单引号和分号
%>

二级域名:<%=hostname%>

会员账号:<%=username%>

  • CopyRight © 2000-2017  八五互联(http://www.85idc.com)  All rights reserved
  • 联系电话:15991356600 15991359933  传真:029-33368183
  • 在线客服:点击发送消息给对方538603  点击发送消息给对方97631570  业务信箱:webmaster@85idc.com
    售前咨询
    售后客服
    专项客服