【www.gdgbn.com--面向对象编程】

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>





http://asp2004.net



<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="";
var i=0,len=m.length-1;
for (;i {
var n = m[i].split("*");
if ( n[0] > 0 )//有子节点
{
var listtype;
if ( i == len-1 )//最后一个
{
str += "" + n[3] + "";

本文来源:http://www.gdgbn.com/jsp/3060/