二级域名泛解析-广州网站建设,广州网站制作网页设计,广州网站改版及维护,咨询热线:15813372291

设为首页　

收藏本站　

联系我们

您的需求是我们努力的方向！本网主要提供网站建设，虚拟主机、空间域名的出售，网站推广及优化网站程序，可制作带有后台管理的HTML生成页的DIV+CSS门户网站，联系热线：020-33802257/15813372291

二级域名泛解析
http://amzoo.net/　发布时间：2013/7/1　来源：广州扬帆科技网　人气:　【大中小】

<% dim sURL,a,b
sURL=lcase(Request.ServerVariables("HTTP_HOST") & "")
a=len(sURL)
b=right(sURL,10)
if sURL="yy114.yy114.org" then   response.redirect("http://yy114.yy114.org")
if sURL="lx-gc.com" then
  response.redirect("http://www.lx-gc.com")
elseif sURL="www.lx-gc.com" then
  response.redirect("http://www.lx-gc.com")
elseif sURL="www.yishuliux"
elseif right(sURL,16)=".yishuliuxue.com" then
  response.redirect("http://www.yishuliuxue.com")
elseif a > 10 Then

  username=left(sURL,len(sURL)-10)
  if username="yy114" then
  response.redirect("http://yy114.yy114.org")
  end if
  set rs= server.CreateObject ("adodb.recordset")
  sql = "select Corp_Name from [yy114_corpinfo] where Corp_NetDis=1 and Corp_NetName=’" & username & "’"
  rs.Open sql,conn,1,1
  if rs.EOF or rs.BOF then
   rs.Close
   set rs = nothing
   conn.
else
   Corp_Name = rs("Corp_Name")
   rs.close
   set rs = nothing
   conn.Close
   set conn = nothing
’   response.write(Corp_NetName & ": 您好!<br>")
’   response.write("欢迎"&Corp_NetName&"进入安全用药二级域名管理网")
      Response.Redirect "pages/selectcorp.asp?company="&Server.UrlEncode(Corp_Name)&""
  end if
  Else
  response.redirect("http://www.yy114.org")
  End If
%>

上一篇：怎么查看服务器日志
下一篇：VB过滤字符

【打印】【关闭】【加入收藏】

	制作流程
客户提出建站申请制定网站建设方案设计出首页平面图客户确认通过支付预付款进行内页及后台开发网站测试，客户上网浏览、验收支付余款上传网站

联系我们

联系电话：
　　　　　15813372291
联系人：
　　　　　扬帆
在线交流：

联系地址：
　　　　广州天河东圃羊城花园

	相关文章
·前后台使用两种不同编(8/4) ·设置64位机器上的I(7/20) ·怎么查看服务器日志(7/5) ·VB过滤字符(7/1) ·SQL语句(7/1) ·.NET.aspx“(6/13) ·IIS数据库连接出错(6/11) ·浏览器的设为主页被篡(6/3) ·网页自动跳转代码(5/30) ·XP下HTTP的40(5/22) ·怎样删除远程桌面连接(3/27) ·如何解决ASP上传大(3/18) ·常见IIS配置错误之(12/26) ·清除arp缓存攻击(7/28) ·C:\WINDOWS(6/17) ·C盘空间不足的解决方(6/6) ·如何查询DNS服务器(6/1) ·IIS站点ie6可以(5/22) ·如何在64位系统运行(3/12) ·ping及reply(2/28)

联系电话：15813372291 在线交流：