我的一亩三分地 我就喜欢!
13fen  设为主页
 收藏本站
 
当前位置: > 一亩三分地:首页 > 网络学院 > 网络编程 > ASP专区 > Asp安全/XML > XMLHTTP实现数据的异步调用
热门文章排行
热门文章排行 手推车”功能的实现(10-07)
八大法则防范ASP网站漏洞(10-23)
ASP教程十一、调试ASP脚本(10-23)
在JSP中访问数据库大全(10-23)
虚机服务中常见Asp.Net低级错误一览(03-21)
精采文章排行
精采文章排行 ASP.NET实现抓取网页中的链接(11-15)
ASP连接数据库的11种方法(11-10)
如何动态创建网页的RSS内容摘要(11-10)
ASP网站漏洞及入侵防范方法(11-10)
ASP自定义函数:对字符串正则替换(11-10)
技术专题推荐
网管论坛交流
 

XMLHTTP实现数据的异步调用 

作者:佚名   来源:一亩三分地   点击:   日期:2007-03-22

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>http://asp2004.net</title>
<link href="style.css" rel="stylesheet" type="text/css">
</head>

<body onLoad="exe(0);">
<script language="javascript" src="function.js"></script>
<script language="javascript">
var isShow;
var isLoad;
isLoad = new ActiveXObject("Scripting.Dictionary");
//isShow = new ActiveXObject("Scripting.Dictionary");
function exe(id)
{
if (!isLoad.Exists(id))
{
isLoad.add(id,'');
loaddata(id);
}
/*
if(isShow.Exists(id))
{
isShow.Remove(id);
}
else
{
isShow.Add(id,'');
}
*/
if (id>0)
change1('a'+id,'b'+id);
}
function loaddata(id)
{
eval('c'+id).innerHTML = '正在加载。。。';
var xml = new ActiveXObject("Microsoft.XMLHTTP");
xml.open("GET","server.asp?id="+id,false);
xml.send();
var returnvalue = unescape(xml.ResponseText);
var m = returnvalue.split("#");
var str;
str="<table border='0' cellspacing='0' cellpadding='0'>";
var i=0,len=m.length-1;
for (;i<len;i++)
{
var n = m[i].split("*");
if ( n[0] > 0 )//有子节点
{
var listtype;
if ( i == len-1 )//最后一个
{
str += "<tr colspan='2' onClick=exe('" + n[1] + "');><td id='b" + n[1] + "' class='menu3'>" + n[3] + "</td></tr>";
listtype="list1";
}
else
{
str += "<tr colspan='2' onClick=exe('" + n[1] + "');><td id='b" + n[1] + "' class='menu1'>" + n[3] + "</td></tr>";
listtype="list";
}
str += "<tr id='a" + n[1] + "' style='display:none'><td id='c" + n[1] + "' class='" + listtype + "'></td>";
}
else//叶子节点
{
if ( i == len-1 )//最后一个
{
str += "<tr><td id='b" + n[1] + "' class='file1'><a href='" + n[4] + "' target='_blank'>" + n[3] + "</a></td></tr>";
}
else
{
str += "<tr><td id='b" + n[1] + "' class='file'><a href='" + n[4] + "' target='_blank'>" + n[3] + "</a></td></tr>";
}
}
}
str += "</table>";
eval('c'+id).innerHTML = str;
}
</script>
<a href="menu.asp">后台管理</a> 异步调用:<br>
<div id="c0"></div>
</body>
</html>




文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【论坛讨论

   相关文章:
·ASP中巧用Response属性 ·第六课:ASP脚本循环语句
·在 Web 页上使用条件数值格式 ·连接数据库查询手册(不仅仅适用于asp)
·警惕"给你的FileSystemObject对象加把锁" ·用ASP做全文检索

   文章评论:(条)
  
 请留名: 匿名评论   点击查看所有评论 网管论坛
 

  责任编辑:一分  声明:刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。