二级域名的解析指向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
投稿猜你喜欢
- 很佩服国外一些前端开发人员对待学问的研究精神，他们很善于总结发现。看到一篇关于安全字体List of Web Safe Fonts的文章，里
- 一定要对用户可能输入的诸如引号，尖括号等特殊字符给予足够重视，它们可能引发严重的安全问题。SQL注入的基本手法之一，就是利用对单引号未加过滤
- 代码如下:create table A_TEST ( PAYOUT_ITEM_CODE VARCHAR2(30) not null, FOR
- 本文只讨论Oracle中最常见的索引，即是B-tree索引。本文中涉及的数据库版本是Oracle8i。 一. 查看系统表中的用户索引 在Or
JavaScript游戏开发之键盘控制层的移动截图：<html> <head> <meta http-equi- 目前，SQL Server数据库有几个版本都在使用中，比如 7.0, 2000和2005，那么，在现实的工作和学习中，你很有可能会需要从以前
- 1.INSERT INTO SELECT语句 语句形式为：Insert into Table2(field1,field2,...) sel
- Oracle :NvlNVL函数:NVL函数是将NULL值的字段转换成默认字段输出。NVL(expr1,expr2)expr1,需要转换的字
- 如何在线压缩Access数据库？Access数据库可以在线压缩吗？可以的，代码和说明见下：compact.asp<％option&nb
- JS在firefox中的兼容性问题,自己也经常遇到.此文是网上资料,不过时间较久不记得原址了...1. document.form.item
- 很久没有发表文章了，最近一直在研究产品设计标准的问题，之前有发过一篇关于 Axure的教程 ，相信很多人已经学会如何使用，这次我给大家介绍一
- Oracle公司6月9日宣布同意收购TimesTen公司，TimesTen是一家私营软件企业，其产品能提高用于股市和机票预订等需要快速响应时
- 自己有一套模块化的思路，想搜索一下有没有共鸣结果排名靠前的是通过class拼凑页面的想法。模块化是twinsen提出来的，从我接收第一个po
- 1、页签的表达。页签表达很清晰，当前页签突出，且层级包涵关系明确；看下图，一目了然的感觉，不用疑惑我在那部分里。不信？拿当当的对比一下，你感
- 在经过前面几个部分的操作之后，我们的网页已经图文并茂，具有相当的效果了，但是这对于网页来说还不够，为了网站中的众多网页能够成为一个有机的整体
- 将转储设备加入到SQL Server备份数据库的地方。在SEM中转储设备是可见性的，并且在设备上的信息被存储在主要数据库的sysdevice
- 自从HTML5能为我们的新网页带来更高效洁净的代码而得到更多的关注，然而唯一能让IE识别那些新元素(如<article>)的途径
- 刚才要说的是这几天亲身体验了一下ebay的AIR感觉挺不错的，无论从界面，交互，功能上都感觉挺好的。关于topic中的“剑走偏锋”是因为我认
- 删除重复记录,将TABLE_NAME中的不重复记录保存到#TABLE_NAME中select distinct&nbs
- 当你在浏览网页时，看到一个很漂亮的特效，你查看源代码时看到的是一队乱码，那多扫兴呀！根据本人的研究，总结出了三种解密方法，与大家分享！！方法
