ParK's Cozy - facebook遊戲 game hack 作弊 港股技术 Archivers

ParK's Cozy - facebook遊戲 game hack 作弊 港股技术 » Archivers » ASP 域名轉向代碼大全

代码1:显示实际路径的方法。

<%
from=lcase(Request.ServerVariables("HTTP_HOST"))
if left(from,9)="yayi-bags" or left(from,13)="www.yayi-bags" then
Response.redirect("http://www.yayi-bags.com/main.asp")'此处为网站首页地址
else
Response.redirect("http://www.yayi2008.com/pjblog2/")'此处为网站首页地址
end if
%>

代码2:不显示实际路径的方法。

<%
from=lcase(Request.ServerVariables("HTTP_HOST"))
if left(from,9)="yayi-bags" or left(from,13)=www.yayi-bags then
Response.redirect("http://www.yayi-bags.com/main.asp")'此处为网站首页地址
else
response.Write( "<frameset><frame src=""/oblog31/""></frameset>")
end if
%>

来源:http://www.yayi-bags.com/pjblog2/article.asp?id=248
================================

多个绑定多域名的ASP代码

如果有有一个ASP空间,而你又想放置多个多个站点,这些代码可以帮到你
PHP的
将以下代码保存为index.php文件放在你的空间根目录下即可!


<?php
/*
@根据不同的域名自动转向同一空间的不同目录
@本程序使用了php中的switch条件判断语句和内置常量$_SERVER['HTTP_HOST']
@使用时请将程序中的URL替换成你需要的URL
------------------------------------------------------------------------
程序版权:www.yeahe.com(热浪精品网络) / 程序作者:hongmo 2004年6月16日夜
------------------------------------------------------------------------
很简单的一个转向程序,但是非常适用,希望对你的网站有所帮助。请尊重作者的版权--谢谢!
使用方法:将本程序放置空间的根目录即可使用(可能少数空间无法正常使用),将其中的域名,目录名换成你自己的域名,目录名。
例如 case "www.yeahe.com":
Header("Location: /main");

Enjoy!
*/

switch ($_SERVER['HTTP_HOST']) {
case "www.yeahe.com":
Header("Location: /main");
exit;
break;

case "www.soyeah.com":
Header("Location: /site");
exit;
break;

case "www.iisnow.com":
Header("Location: /iisnow");
exit;
break;

case "yeahe.com":
Header("Location: /main");
exit;
break;

case "soyeah.com":
Header("Location: /site");
exit;
break;

default:
Header("Location: /iisnow");
exit;
break;
}
?>
ASP的<%cc_str_host_name = LCase(Request.ServerVariables("HTTP_HOST"))
'判断主机名进行跳转
if cc_str_host_name="URL1" then
response.redirect "1.htm"
Else
response.redirect "2.htm"
End if%>
[测试有效]
第一个
<%if Request.ServerVariables("SERVER_NAME")="URL1"then
response.redirect "zkj"
else
response.redirect "1.htm"
end if%>

第二个
<%
select case request.servervariables("http_host")
case "URL1" '1
Server.Transfer("1.htm")
case "URL2" '2
Server.Transfer("2.htm")
case "URL1" '3
Server.Transfer("3.htm")
...... 继续添加 ......
end select
%>

第三个
<%if instr(Request.ServerVariables
("SERVER_NAME"),"URL1")>0 then
response.redirect "1.htm"
else if instr(Request.ServerVariables
("SERVER_NAME"),"URL2")>0 then
response.redirect "2.htm"
else if instr(Request.ServerVariables
("SERVER_NAME"),"URL3")>0 thenr
esponse.redirect "3.htm"
end if
end if
end if%>

第四个
<%if Request.ServerVariables("SERVER_NAME")="URL1" then
response.redirect "1.htm"
else if Request.ServerVariables("SERVER_NAME")="URL2" then
response.redirect "2.htm"
else if Request.ServerVariables("SERVER_NAME")="URL3" then
response.redirect "3.htm"
end if
end if
end if%>

第二种方法:


<%
dim domainname,result
domainname=Request.ServerVariables("SERVER_NAME")
result=right(domainname,12)
if result="URL1" then
%>
<!--#include file=1.htm -->
<%
Elseif result="URL2" then
%>
<!--#include file=2.htm -->
<%
Else
%>
<!--#include file=3.asp -->
<%
End if
%>


来源:http://hi.baidu.com/6sha/blog/item/b863d90006c70712738b654d.html

===========================================

IIS也可以实现    不需要其他软件    

其实你的问题等于是一个服务器上设置多个站点的问题。

方法:  
1)你服务器的IP地址假设:123.123.123.123 (假设你的服务器就一个IP地址)

2)你的域名假设:   www.1.com   打算指向硬盘d:/web1 这个文件夹的网页        www.2.com 打算指向硬盘d:/web2 这个文件夹的网页    

3)在域名管理的地方(www.1.com/www.2.com申请域名的地方你申请后会有管理域名的,如果找不到可以问你的域名供应商)
把以上域名DNS全部指向服务器的IP地址    123.123.123.123

4)在服务器上打开IIS,“默认网站”--“新建”--“网站”--“描述”--“IP地址和端口设置”
    IP地址和端口设置里面,IP地址选 123.123.123.123 端口为80    注意,此网站的主机头    把www.1.com写上   然后一路下一步

5)www.2.com设置一样    只是网站的主机头写成www.2.com   并指向的文件夹为d:/web2

6)注意设置好的网站的权限问题,比如应该允许ASP本运行等    检查无误

7)OK    输入www.1.com   访问到的就是d:/web1 这个文件夹的网页       输入www.2.com   访问到的就是d:/web2 这个文件夹的网页   

其实原理是,两个域名都指向同一个IP,访问的时候请求到达服务器后,由IIS来判断具体访问哪个目录而已。

来源:http://topic.csdn.net/u/20071002/11/e1545209-972f-42a2-93f9-4d563514b1c8.html

查看完整版本:ASP 域名轉向代碼大全

© ParK's Cozy - facebook遊戲 game hack 作弊 港股技术

Supported by DHL Author:Wolfit