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

  自己做了asp的二级域名转向已经使用当中,但用到另一种方法:前台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.Recordset")

  whkRs.open whkSql,whkConn,3,3

  %>

  <script language="javascript">

  var records = [],whkCoun = 0,whkFlag = 0;

  <%

  Do while not whkRs.Eof

  %>

  records[whkCoun] = new 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.substring(0,whkUrl.indexOf("/"));

  document.write("<br>whkUrl:"+whkUrl);

  if (whkUrl.toLowerCase() != "www.taofun.cn")

  {

  var whkFirstP = whkUrl.indexOf("."),whkEndP = whkUrl.lastIndexOf("."),gotoUrl;

  if ((whkFirstP == whkEndP) && ((whkFirstP != -1) || (whkEndP != -1)))

  {

  whkFlag = 0;

  window.alert("taofun.cn");

  //window.location.href = "http://www.taofun.cn/"

  }

  else

  {

  if (whkUrl == "localhost")

  {

  whkFlag = 0;

  window.alert("localhost");

  }

  else

  {

  var whkUrl2 = whkUrl.substring(0,whkUrl.indexOf("."));

  document.write("<br>whkUrl2:"+whkUrl2);

  if (whkUrl2.toLowerCase() == "www")

  {

  if (whkUrl.indexOf(".",whkFirstP+1) == whkUrl.lastIndexOf(".",whkEndP-1))

  for(i=0;i<whkCoun;i++)

  {

  document.write("<br>这里是读取的bh:"+records[i][0]);

  if (records[i][0] == whkUrl.substring(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]+"的二级域名。");

  break;

  }

  }

  else

  {

  whkFlag = 0;

  window.alert("输的太多了!");

  //window.location.href = "http://www.taofun.cn/";

  }

  }

  else

  {

  whkFlag = 0;

  window.alert("开头请输www");

  //window.location.href="http://www.taofun.cn/";

  }

  }

  }

  }

  else

  {

  whkFlag = 0;

  window.alert("去网站首页!");

  //window.location.href = whkUrl;

  }

  document.write("<br>最后结果:"+gotoUrl+whkwhkwhk);

  if (whkFlag == 1)

  {

  document.write("<frameset cols=\"*\"><frame frameborder=\"0\" scrolling=\"auto\" src=\""+gotoUrl+"\"><\/frameset>" );

  }

  </script>