如何用我的国际域名做虚拟域名？
发布时间：2010-06-16 09:53:00
如何用我的国际域名做虚拟域名？
config.asp
<％
Domain_URL = "intels.net"
' 域名
Ad = 0
' 是否有广告弹出
Fo = 0
' 是否使用框架
DBPath = "DRIVER={Microsoft Access Driver (*.mdb)};dbq=" &
Server.MapPath("Domain.Mdb")
CopyRight = "Asp之家"
' 版权信息
％>
default.asp
<％@ LANGUAGE=VBScript％>
<％Response.Expires=0％>
<!-- #include file="Config.Asp" -->
<％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")
Conn.Open DBPath
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open "SELECT * FROM USER WHERE USER_USERNAME='" & USER & "'",Conn
If rs.bof Then
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing
Response.Redirect "Main.Asp"
End If
URL = Rs("USER_URL")
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing
If Ad=1 Then
Ad="<script language='JavaScript'>Popup = window.open
('', 'Popupnav', 'width=200,height=150,resizable=0,scrollbars=auto');h
qtpopup.location.href = 'Ad.Asp';</script>"
End If
If Fo=1 Then％>
<html>
<head>
<title>虚拟域名 - asp之家</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<frameset rows="0,*" cols="*" border=0 framespacing=0>
<frame name="Top" src="Top.Asp">
<frame name="Down" src="<％=URL％>">
</frameset>
<noframes>
<body>
噢,您的浏览器不支持框架显示!
</body>
</noframes>
</html>
<％Else％>
<meta http-equiv="refresh" content="0;url=<％=URL％>">
<％End If％>
数据库domain.mdb结构：
user表
USER_ID USER_USERNAME USER_PWD USER_URL USER_EMAIL
0
投稿猜你喜欢
- 今天 大白 问了一个关于CSS权重的问题：关于选择器权重的问题 。class的权重是10 标签权重是 1 。比如说 p span{} 权重是
嗯，你可以说我很无聊。最近疯狂加班，今天才得以有时间搞一个CSS的像素图来消遣休息下。先看效果：运行代码框<!DOCTYPE html- 由于代码比较短，这里就不进行注释了代码如下:<％ '当目标页面的包含文件即#include的页面里边存在respon
- 数据共享是数据库最基本的特征之一。但是数据共享虽然为员工带来了便利，但也产生了一些负面作用。例如因用户并发存取而导致的对数据一致性的破坏、由
- 安装MySQL假设你把所有必须的源码或者包都放在了/tmp下。如果你下载的是RPM包的话，那比较简单；如果你下载的是二进制包（你没有rpm程
- this指针是面向对象程序设计中的一项重要概念，它表示当前运行的对象。在实现对象的方法时，可以使用this指针来获得该对象自身的引用。和其他
- tbody 标签表格主体（正文）。该标签用于组合 HTML 表格的主体内容。tbody 元素应该与&
- DW2004的中文乱码情况你遇到过么？乱码一般是怎么出现的呢？也许很多时候用其他软件（比如Editplus）写程序的时候，忘了meta标签里
- 当然，每个人都可以编写CSS代码，甚至你现在已经让它为你的项目工作了。但是CSS还可以更好吗？开始用这5个Tips改进你的CSS吧！1.合理
- 樂思蜀将SEO工作中所需要的301转向代码进行了整理，收藏并分享，以备查阅。1、IIS下301设置 Internet信息服务管理器 ->
- 浏览器：IE ，不支持firefoxfilter视觉滤镜的种类:Alpha(透明度) Blur(模糊) Chroma(指定颜色透明) Dro
- 作者：F. Permadi译者：Sheneyan(子乌)英文原文： INTRODUCTION TO JavaScript Functions
- JDBC连接MySQL数据库关键的四个步骤1、查找驱动程序MySQL目前提供的Java驱动程序为Connection/J，可以从MySQL官
- 数据库计算机 databasecomputer 实现数据库的存储、管理和控制的一种专用计算机系统。它能十分快速而有效地完成各种数据库操作，并
- 先把我的browser信息说明一下：这是在opera里about中显示的“浏览器识别”Opera/9.62 (Windows NT 5.1;
- 我们先看一下淘宝的页面：这么一个庞然大物，该怎么切图呢？显然按照给出的方法也可以完成这项任务，但是做为前端开发的我们是否应该给自己提出更高的
- 当点了链接后，跳出的网页地址是https://www.aspxhome.com/ 或https://www.cidianwang.
- 如果您还不太了解XML技术，您可以先看看此文：XML的语法、结构以及相关的一些技术 及 XML DOM介绍和例子XML中 CDATA的作用：
- 今天写了一个放迅雷焦点广告的效果，还请大家多多指正，先附上效果图一张：相关文章：迅雷首页新闻图片轮播效果js源码首先是JS代码部分，之前一定
- 关于SQL查询效率，100w数据，查询只要1秒，与您分享:机器情况：p4: 2.4内存: 1 Gos: windows 2003数据库:SQ
