二级域名的解析指向ASP源码

时间:2007-10-19 19:13:00 

二级域名的解析指向ASP源代码,懂程序的人一看就明白怎么实现了。

呵呵!真简单


<%@  LANGUAGE  =  VBScript.Encode  %>
<%
Server_Name  =  Request.ServerVariables("SERVER_NAME")
'获取访问网址
'下面提取二级域名名称
For  I=1  To  Len(Server_Name)
If  Mid(Server_Name,i,1)="."  Then  Exit  For
USER  =  USER  &  Mid(Server_Name,i,1)
Next
Set  conn  =  Server.CreateObject("ADODB.Connection")
        DBPath  =  Server.MapPath("data/url.mdb")
      conn.Open  "driver={Microsoft  Access  Driver  (*.mdb)};dbq="  &  DBPath
    SET  rs  =  Server.CreateObject("ADODB.Recordset")
  sql  ="SELECT  *  From  url  where  name=“"&user&"“"
' 这里搜索数据库中该二级域名对应的访问路径,我们常看到的是根据用户名生成的二级域名,就可以使用这个方法
rs.open  sql,conn,1,2
if  rs.eof  or  rs.bof  then
response.write  ("错误:找不到该页")
rs.close
conn.close
set  rs=nothing
set  conn=nothing
Else
url=rs("zurl")
rs.close
conn.close
set  rs=nothing
set  conn=nothing
%>
这里跳转到对应的访问地址
<meta  http-equiv="refresh"  content="0;url=<%=URL%>">
<%End  If%>


程序备注:asp之家


标签:二级域名,域名
0
投稿

猜你喜欢

  • MySQL IFNULL判空问题解决方案

    2024-01-21 13:23:10
  • Python实现Keras搭建神经网络训练分类模型教程

    2023-08-06 12:33:03
  • HTML:scrollLeft,scrollWidth,clientWidth,offsetWidth完全详解

    2024-04-22 22:25:25
  • python基础入门学习笔记(Python环境搭建)

    2022-01-12 20:27:48
  • 基于vue-ssr的静态网站生成器VuePress 初体验

    2024-05-09 09:32:38
  • 利用Python在一个文件的头部插入数据的实例

    2023-02-06 13:04:33
  • js操作两个json数组合并、去重,以及删除某一项元素

    2024-04-18 10:58:23
  • 一文让你秒懂精通pip并快速体验深度学习应用【建议收藏】

    2022-07-08 22:27:56
  • 几个缩减MySQL以节省磁盘空间的建议

    2024-01-17 11:41:23
  • C#简单访问SQLite数据库的方法(安装,连接,查询等)

    2024-01-22 18:29:22
  • Mysql中Insert into xxx on duplicate key update问题

    2024-01-23 22:32:36
  • Golang中runtime的使用详解

    2024-05-13 10:40:08
  • python学习之基于Python的人脸识别技术学习

    2021-04-23 22:09:25
  • 十个实用且简单的MySQL函数

    2024-01-27 06:37:16
  • MySql数据库捕获sql语句异常的方法

    2011-08-05 18:17:28
  • Python编程中的异常处理教程

    2022-10-16 04:26:23
  • mysql外键基本功能与用法详解

    2024-01-23 00:52:13
  • vue.js指令v-for使用及索引获取

    2024-04-30 10:46:49
  • Go如何优雅的使用字节池示例详解

    2024-02-10 21:10:17
  • 详解SQL Server中数据库快照工作原理

    2009-01-21 14:18:00
  • asp之家 网络编程 m.aspxhome.com