!写了一个在html页面实现增加.删除.修改管理员的例子,还请大家指教

呵呵!写了一个在html页面实现增加.删除.修改管理员的例子,还请大家指教asp页面就不用发了----------------

呵呵!写了一个在html页面实现增加.删除.修改管理员的例子,还请大家指教
asp页面就不用发了

-----------------------------------------=================
<HTML>
<HEAD>
<TITLE> 新增管理员 </TITLE>
<META http-equiv=Content-Type content=text/html; charset=gb2312 charset=gb2312>

<style type= "text/css ">

</style>

<script language= "Jscript ">

function GetDataFromServer(sXML, sURL)
{
var oXML = new ActiveXObject( "MSXML2.DOMDocument ");
oXML.async = false;
oXML.loadXML(sXML);
var xmlResult = PostDataToServer(oXML, sURL);
return xmlResult.xml
}

function GetDataFromServer_obj(sXML, sURL)
{
var oXML = new ActiveXObject( "MSXML2.DOMDocument ");
oXML.async = false;
oXML.loadXML(sXML);
return PostDataToServer(oXML, sURL);
}

function PostDataToServer(oXML, sURL)
{
var oXmlHttp = new ActiveXObject( "Microsoft.XMLHTTP ");
oXmlHttp.Open( "POST ", sURL , false);
oXmlHttp.Send(oXML);
return oXmlHttp.responseXML;
}

function HandleAdmin(thisobj)
{

var u = document.all( "u ").value ;
var p = document.all( "p ").value ;
var t = document.all( "t ").value ;
var y ;
if (u== " "||p== " "||t== " ")
{
alert( "没有输入完整！ ") ;
return false ;
}
if (p!=t)
{
alert( "确认密码输入错误！ ")
return false ;
}
if (thisobj.value== "增加 ")
{
y = "add " ;
}
else
{
y = "update " ;
}

var objDom= new ActiveXObject( "Microsoft.XMLDOM ");
var sURL = "AdminXML.asp ";
var tempXml = " <Data> <Resout Attr= ' "+p+ " ' Type= ' "+y+ " '> "+u+ " </Resout> </Data> ";
var InXML = GetDataFromServer(tempXml,sURL);
if (objDom.loadXML(InXML))
{
if (objDom.childNodes(0).getAttribute( "ErrDesc ")== " ")
{
alert( "操作成功！ ");
}
else
{
alert(objDom.childNodes(0).getAttribute( "ErrDesc "));
}
}
else
{
alert( "加载服务器端返回的XML文件失败! ");
}

}

function ShowApply(obj,par)
{
document.all( "u ").value = " " ;
document.all( "p ").value = " " ;
document.all( "t ").value = " " ;

if (!document.getElementsByTagName( "table "))
{
return false ;
}
var TableObj = document.getElementsByTagName( "table ") ;

for (i=0;i <TableObj.length;i++)
{
TableObj[i].style.display = "none " ;
}
document.all(obj).style.display = " " ;
if(par!= " ")
{
if (par== "List ")
{
return GetAdminFromXML();
}
else
{
var d = document.all(obj).childNodes(0) ;
d.childNodes(1).childNodes(0).innerText = par;
d.childNodes(5).childNodes(0).childNodes(0).value = par.substr(0,2) ;
}
}

}

function GetAdminFromXML()
{

if (document.all( "ID "))
{
return ;
}
var objDom= new ActiveXObject( "Microsoft.XMLDOM ");
var sURL = "AdminListXML.asp ";
var tempXml = " <Data> </Data> ";
var InXML = GetDataFromServer(tempXml,sURL);
if (objDom.loadXML(InXML))
{
if (objDom.childNodes(0).getAttribute( "ErrDesc ")== " ")
{
var ChildNum = objDom.getElementsByTagName( "R1 ");
for (i=0;i <ChildNum.length;i++)
{
var NewTr = Q.insertRow();
var NewTd0 = NewTr.insertCell();
var NewTd1 = NewTr.insertCell();
var NewTd2 = NewTr.insertCell();
NewTr.align = "center ";
NewTd0.innerHTML = " <INPUT TYPE= 'checkbox 'NAME= 'ID 'value= ' "+ChildNum[i].getAttribute( "Attr ")+ " '> "
NewTd1.innerText = ChildNum[i].getAttribute( "Attr ")
NewTd2.innerText = ChildNum[i].text
}
var LastTr = Q.insertRow();
var LastTd0 = LastTr.insertCell();
var LastTd1 = LastTr.insertCell();
LastTr.align = "center " ;
LastTr.height= 50 ;
LastTd0.innerHTML = " <button onclick= 'DelAdmin() '> 删除 </button> " ;
LastTd1.innerHTML = " <button onclick=ShowApply( 'H ', ' ')> 返回 </button> " ;

}
else
{
alert(objDom.childNodes(0).getAttribute( "ErrDesc "));
return ShowApply( "H ", " ")

}
}
else
{
alert( "加载服务器端返回的XML文件失败! ");
}

}

function DelAdmin()
{
if (!document.all( "ID "))
{
return false ;
}

var DelStr = " <Data> " ;
if(document.all( "ID ").length != undefined)
{

for(i=0;i <(document.all( "ID ").length);i=i+1)
{
if(document.all( "ID ")[i].checked==true)
{
DelStr = DelStr+ " <Name> "+document.all( "ID ")[i].value+ " </Name> " ;
}
}

}

else
{
if(document.all( "ID ").checked==true)
{
DelStr = DelStr+ " <Name> "+document.all( "ID ").value+ " </Name> " ;
}
}

DelStr = DelStr+ " </Data> "

if (DelStr!= " <Data> </Data> ")
{
var objDom= new ActiveXObject( "Microsoft.XMLDOM ");
var sURL = "DelAdminXML.asp ";
var tempXml = DelStr ;
var InXML = GetDataFromServer(tempXml,sURL);
if (objDom.loadXML(InXML))
{
if (objDom.childNodes(0).getAttribute( "ErrDesc ")== " ")
{
alert( "操作成功！ ") ;
window.location.reload() ;
}
else
{
alert(objDom.childNodes(0).getAttribute( "ErrDesc "));
}
}
else
{
alert( "加载服务器端返回的XML文件失败! ");
}

}

}
</script>

<script language= "Jscript " for= "window " event= "onload ">

var objDom= new ActiveXObject( "Microsoft.XMLDOM ");
var sURL = "CheckAdminXML.asp ";
var tempXml = " <Data> </Data> " ;
var InXML = GetDataFromServer(tempXml,sURL);
if (objDom.loadXML(InXML))
{
if (objDom.childNodes(0).getAttribute( "ErrDesc ")!= " ")
{
document.write( " <body bgcolor= '#000000 '> ") ;
alert(objDom.childNodes(0).getAttribute( "ErrDesc "));
window.opener = null ;
window.close() ;
}
}
else
{
alert( "加载服务器端返回的XML文件失败! ");
}

</script>

</HEAD>

<BODY>
<p align= "right ">
<br>
<font onclick= "Jscript:location.href= 'AdminLogin.asp?id=out ' "color= "#FFFFFF ">
安全退出
</font>
        
<p>
<table width= "300 "align= "center "cellspacing= "0 "bgcolor= "#FFFFFF "id= "A "style= "display:none ">
<tr>
<td height= "100 " bgcolor= "#0099FF ">   </td>
</tr>
<tr align= "center ">
<td height= "30 " bgcolor= "#FFCC00 "> 新增管理员 </td>
</tr>
<tr align= "center ">
<td height= "30 "> 管理员帐号： <input type= "text " id= "u " class= "input "> </td>
</tr>
<tr align= "center ">
<td height= "30 "> 管理员密码： <input type= "password " id= "p " class= "input "> </td>
</tr>
<tr align= "center ">
<td height= "30 "> 确认密码： <input type= "password " id= "t " class= "input "> </td>
</tr>
<tr align= "center ">
<td height= "30 ">
<input type= "button " value= "增加 "onclick= "Jscript:HandleAdmin(this) ">
    
<input type= "button " value= "返回 "onclick= "Jscript:ShowApply( 'H ', ' ') ">

</td>
</tr>
</table>

<table width= "500 "align= "center "cellspacing= "0 "bgcolor= "#FFFFFF "id= "H ">
<tr height= "100 ">
<td align= "center " bgcolor= "#0099FF "> </td>
</tr>
<tr height= "30 ">
<td align= "center ">
<span onclick= "Jscript:ShowApply( 'A ', '修改帐号和密码 ') "> 修改帐号和密码 </span>
|    
<span onclick= "Jscript:ShowApply( 'A ', '增加管理员 ') "> 增加管理员 </span>
|    
<span onclick= "Jscript:ShowApply( 'Q ', 'List ') "> 管理员列表 </span>
</td>
</tr>
</table>

<table width= "500 "align= "center "cellspacing= "0 "bgcolor= "#FFFFFF "id= "Q "style= "display:none ">
<tr align= "center " height= "100 ">
<td colspan= "3 " bgcolor= "#0099FF ">   </td>
</tr>
<tr align= "center " height= "30 " bgcolor= "#FFCC00 ">
<td> 选择编辑 </td>
<td> 管理员帐号 </td>
<td> 管理员密码 </td>
</tr>
</table>

</BODY>
</HTML>

[解决办法]
mark
[解决办法]
回去好好研究下~！