ASP实现同一虚拟主机空间安放多个网站的方法
ASP实现同一虚拟主机空间安放多个网站的方法
现在的域名很便宜，不少朋友手里多少都有几个，如果您想用手中的几个域名做多个网站的话，并不用同时购买多个虚拟主机，您只要先将您所有的域名绑定到您的虚拟主机上，然后将虚拟主机根目录中的index.asp（首页文件）里加入下列代码就可以了：
<%
sn=lcase(Request.ServerVariables("SERVER_NAME")) '用于获取用户是通过哪个域名访问的，并转换成小写
if sn="www.zhongxun.net" or sn=" zhongxun.net" then server.Transfer("default1.asp")
if sn="www.37dns.com" or sn="37dns.com" then server.Transfer("index.html")
%>
看明白了吧，如果访问者输入的域名是[url]www.zhongxun.net[/url]或zhongxun.net的话，就访问default1.asp页面，如果是用37dns.com或[url]www.37dns.net[/url] 的话就调用index.html文件。
网上还有一些教程是让您用response.redirect来实现转向，但在这里，我建议您使用server.Transfer("")来实现这个功能，好处有以下几个方面：
１、不会出现页面跳转，直接输入网址后，网址后不会带任何文件，访问者不会看出你的两个网站是放在同一虚拟主机上。
２、server.Transfer("")不会阻挡搜索引擎对你的网站的收录，而response.redirect可不一定。
=========================================================================
=========================================================================
如果一个空间放多个网站，一般是在域名解析里面使用URL转发，但是这样会在输入域名后，地址栏上面显示A记录域名的地址。
例如：www.cunyu.cn 已做A记录绑定空间，如果我将www.k2climb.cn做URL转发到下面地址http://www.cunyu.cn/k2climb，在浏览器地址栏输入www.k2climb.cn就会跳转到www.cunyu.cn/k2climb这个地址。
下面这个方法可以实现多个域名共用一个空间，而看上去象是都做了A记录，值得推荐。
用server.Transfer("")来实现一个空间多个站的方法：
您先将您所有的域名绑定到您的虚拟主机上（请酌情考虑，本人使用的万网域名支持10条A记录绑定，超出会收取费用），然后将虚拟主机根目录中的index.asp（首页文件）里加入下列代码就可以了：
<%
sn=lcase(Request.ServerVariables("SERVER_NAME")) '用于获取用户是通过哪个域名访问的，并转换成小写
if sn="www.cunyu.cn" or sn="cunyu.cn" then server.Transfer(
相关文档：
http://www.w3school.com.cn/asp/met_mappath.asp
定义和用法
MapPath 方法可把指定的路径影射到服务器上相应的物理路径上。
注释：此方法不能用于 Session.OnEnd 和 Application.OnEnd 中。
实例
实例 1
举例，文件 test.asp 位于 C:\Inetpub\wwwroot\Script。
文件 Test.asp (位于 C:\Inetpub\wwwroot\Script) 包� ......
一、 环境设置
服务器端的环境设置从参考数据上看，微软系列的设置应该都行，即：
1．Win9x+PWS+Office
2．Win2000 Professional+PWS+Office
3．Win2000 Server+IIS+Office
目前笔者测试成功的环境是后二者。Office的版本没有特别需求，考虑到客户机设置的不确定性和下兼容特性，建议服务器端Of ......
Using the global.asa to schedule ASP code execution.
Have you ever had some asp code that needed to execute every once in a while but, you just didn't know how ......
与ASP相比，ASP.NET在很多方面有了显著的改进，这些方面包括：性能、状态管理、可缩放性、配置、部署、安全性、输出缓存控制、网络场支持和XML Web services结构等。
如果您具有ASP 开发技能，则新的 ASP.NET 编程 ......
<%
'*******************************************************
'作 用: 得到文件扩展名
'函数名: GetFileExt(fileTrue)
'参 数: sFileName 文件名
......
