【www.gdgbn.com--导航菜单】





ajax二级联动菜单
<script language="网页特效">
/*--------------------------------------------------------------------
 *
 *创建一个xmlhttp实例
 *return object 成功创建返回一个xmlhttp对象实例,否则返回false
 *
 *--------------------------------------------------------------------
 */
function createajax(){
  var xmlhttp;
  try
  {
   xmlhttp = new activexobject("microsoft.xmlhttp");   //ie的创建方式
  }
  catch(e)
  {
   try
   {
    xmlhttp = new xmlhttprequest();     //ff等浏览器的创建方式
   }
   catch(e)
   {
    xmlhttp = false;        //创建失败，返回false
   }
  }
  return xmlhttp;     //返回xmlhttp实例
}
function getoid(ids,sid){
 var xmlhttp = createajax();
 var urllink = "list10.asp?oid="+ids+"&sid="+sid+"&n="+math.random()+"";
 if(xmlhttp){
  xmlhttp.open("get",urllink,true);
  xmlhttp.onreadystatechange=function(){
   if(xmlhttp.readystate == 4){  //客户端完成请求
      if(xmlhttp.status == 200){ //服务端完成处理并返回数据
       var responsetext = xmlhttp.responsetext;
       if(responsetext == ""){ //service返回了错误信息
         //alert("yes");
        smclass.innerhtml = responsetext;
       }else{
        //alert("no");
        smclass.innerhtml = responsetext;
       }
      }else{
       smclass.innerhtml = "服务器返回异常...";//服务器出现异常
      }
     }else{
     smclass.innerhtml = "正在加载数据...";//请求未完成时的提示信息
   }
  }
  xmlhttp.send(null);//向服务器发送请求
 }else{
  smclass.innerhtml = "您的浏览器不支持或未启用 xmlhttp!";//创建未成功
 }
}
</script>




<%
response.charset = "gb2312"
dim outstr,ors,osql
oid = request("oid")
sid = request("sid")
if (oid = "" or isnull(oid)) then
 outstr = ""
else
 outstr = ""
 set ors = nothing
end if
response.write(outstr)
""数据库教程连接文件


dim mdb,conn,connstr
mdb="database/adsl.mdb"
set conn = server.createobject("adodb.connection")
connstr = "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath(mdb) & " "
conn.open connstr
sub closeconn()
    if isobject(conn) then
        conn.close
        set conn = nothing
    end if
end sub

""表结构

id otitle oid opath ofile opx
1 云南线路 0 yunnanxianlu index.shtml 1
2 云南省旅游 1 yunnanshenglvyou index.shtml 2
3 国内旅游 1 guonalvyou index.shtml 1
4 出境旅游 1 chujinglvyou index.shtml 3
5 走进云南 0 zoujinyunnan index.shtml 2
6 云南土特名产 5 yunnantutemingchan index.shtml 1
7 云南少数民族 5 yunnanshaoshuminzu index.shtml 2
8 云南十八怪查 5 yunnanshibaguaicha index.shtml 3
%>

源码下载地址

http://down.111cn.net/down/code/asp/2010/0927/20955.html

本文来源：http://www.gdgbn.com/wangyetexiao/27199/