我的一个上机登记的例子[红宝网络__红宝软件_

150042092
手机:13380206696

首页

软件商城

开发技术

工具下载

教学资源

网络课堂

赤雪天空

留言

QQ空间

位置：红宝网络 >> 开发技术 >> HTA技术 >> 正文

在本站购买的软件3年内免费升级 [2008-07-01 23:02:29] 人教版小学数学1-6册课件已全部上传完 [2007-07-12 22:08:11] 人教版小学语文1-6册课件已全部上传完 [2007-06-23 00:16:04] 关于本站课件说明 [2007-06-20 08:56:00] 红宝网络第三次改版了 [2007-06-09 16:32:46]

我的一个上机登记的例子

我的一个上机登记的例子

［作者：Admin 来源：红宝网络点击数：更新时间：2008-3-27 文章录入：Admin ］

【字体：

】

<html>
<head>
<title>登记</title>
<HTA:Application caption="no" windowstate="maximize">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<SCRIPT language=javascript>
var url="http://xxjs.nhedu.net/disks/dnsdj/index.asp";//请修改成你的URL地址
var xmlhttp;
function createXMLHTTPReaquest(){
if(window.ActiveXObject){
  xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
}else if(window.XMLHTTPRequest){
  xmlhttp=new XMLHTTPRequest();
}
}
function callserver(){
var userName=document.getElementById("userName").value;
if (userName==""){
  alert("请输入你的姓名！");
  document.getElementById("userName").focus();
}else{
  tisi.innerHTML="<font color=red>正在提交，请等待...</font>";
  createXMLHTTPReaquest();
  ComputerName=showComputerName.innerText;
  sql=url+"?ComputerName="+ComputerName+"&userName="+userName;
  xmlhttp.onreadystatechange = updatePage;
  xmlhttp.open("POST",sql,true);
  xmlhttp.send(null);
}
}
function updatePage() {
if (xmlhttp.readyState == 4){
  if (xmlhttp.status == 200){
   if(xmlhttp.responseText=="dengjiok"){
    tisi.innerText="";
    alert("登记成功！");
    self.close();
   }else{
    alert("登记不成功，请检查原因:\n"+xmlhttp.responseText);
    tisi.innerText="<button onClick='callserver()'>提交</button>";
   }
  }else{
   alert("错误代码："+xmlhttp.status);
   tisi.innerText="<button onClick='callserver()'>提交</button>";
  }
}
}
function show(){
var WshNetwork = new ActiveXObject("WScript.Network");
showComputerName.innerText=WshNetwork.ComputerName;
}
</SCRIPT>
</head>
<body onLoad="show()">
<p> </p>
<table width="350" border="0" align="center" cellpadding="9" cellspacing="1" bgcolor="#999999">
<tr>
    <td height="40" colspan="2" align="center" bgcolor="#CCCCCC"><B>请输入你的姓名</B></td>
    </tr>
<tr>
    <td align="right" bgcolor="#CCCCCC">计算机名：</td>
    <td bgcolor="#CCCCCC" id="showComputerName"> </td>
</tr>
<tr>
    <td align="right" bgcolor="#CCCCCC">姓　　名：</td>
    <td bgcolor="#CCCCCC">
      <input name="userName" type="text" id="userName" size="15" maxlength="12"></td>
</tr>
   <tr>
    <td colspan="2" align="center" bgcolor="#CCCCCC" id="tisi"><button onClick="callserver()">提交</button></td>
</tr>
</table>
</body>
</html>