专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅

首页 »Javascript教程 » 二级域名转向:JS加ASP 2级域名转向的代码 »正文

二级域名转向:JS加ASP 2级域名转向的代码

来源: 发布时间:星期六, 2008年12月27日 浏览:41次 评论:0
自己做了asp 2级域名转向已经使用当中但用到另种思路方法:前台JS加ASP转向却转不了调试已经通过但不能转向不知道为什么请帮忙指出原因谢谢!!!
<%
Dim whkDbq,whkSql,whkRs,whkCount
Set whkConn = Server.CreateObject("ADODB.Connection")
whkDbq = Server.MapPath("SqlTaoFun.mdb")
whkConn.Open"Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&whkDbq
whkSql = "select bh,id from UserInfo where State='3'"
Set whkRS = Server.CreateObject("ADODB.Record")
whkRs.open whkSql,whkConn,3,3
%>
<script language="javascript">
var records = ,whkCoun = 0,whkFlag = 0;
<%
Do while not whkRs.Eof
%>
records[whkCoun] = Array("<%=whkRs("bh")%>","<%=whkRs("id")%>");
document.write("whkCoun:"+whkCoun+" records["+whkCoun+"]:"+records[whkCoun][0]+records[whkCoun][1]+"<br>");
whkCoun = whkCoun + 1;
<%
whkRs.MoveNext
'whkConn = whkConn + 1
Loop
'Response.End
%>
whkUrl = document.location.href;
document.write(whkUrl)
whkUrl = whkUrl.replace("http://","");
whkUrl = whkUrl.sub(0,whkUrl.indexOf("/"));
document.write("<br>whkUrl:"+whkUrl);
(whkUrl.toLowerCase != "www.taofun.cn")
{
var whkFirstP = whkUrl.indexOf("."),whkEndP = whkUrl.lastIndexOf("."),gotoUrl;
((whkFirstP whkEndP) && ((whkFirstP != -1) || (whkEndP != -1)))
{
whkFlag = 0;
window.alert("taofun.cn");
//window.location.href = "http://www.taofun.cn/"
}

{
(whkUrl "localhost")
{
whkFlag = 0;
window.alert("localhost");
}

{
var whkUrl2 = whkUrl.sub(0,whkUrl.indexOf("."));
document.write("<br>whkUrl2:"+whkUrl2);
(whkUrl2.toLowerCase "www")
{
(whkUrl.indexOf(".",whkFirstP+1) whkUrl.lastIndexOf(".",whkEndP-1))
for(i=0;i<whkCoun;i)
{
document.write("<br>这里是读取bh:"+records[i][0]);
(records[i][0] whkUrl.sub(whkFirstP+1,whkUrl.indexOf(".",whkFirstP+1)))
{
whkFlag = 1;
gotoUrl = "http://www.taofun.cn/show/Shop.asp?id="+records[i][1];
window.alert("找到"+records[i][0]+" 2级域名");
;
}
}

{
whkFlag = 0;
window.alert("输太多了!");
//window.location.href = "http://www.taofun.cn/";
}
}

{
whkFlag = 0;
window.alert("开头请输www");
//window.location.href="http://www.taofun.cn/";
}
}
}
}

{
whkFlag = 0;
window.alert("去网站WebSite首页!");
//window.location.href = whkUrl;
}
document.write("<br>最后结果:"+gotoUrl+whkwhkwhk);
(whkFlag 1)
{
document.write("<frame cols=\"*\"><frame frameborder=\"0\" scrolling=\"auto\" src=\""+gotoUrl+"\"><\/frame>" );
}
</script>
0

相关文章

读者评论

发表评论

  • 昵称:
  • 内容: