Ajax+asp应用实例注册模块，表单提交

时间：2022-12-03 14:28 编辑：来源：阅读：
扫一扫，手机访问

摘要：Ajax+asp应用实例注册模块，表单提交

default.asp

[url=css.css]<style type="text/css">  </style> </head> <body> <h2>Ajax应用实例: 注册模块</h2> <div id="Layer1"> <div id="msg"></div> </div> ID: <input type="text" id="regid" /> Password: <input type="password" id="regpassword" /> <input name="f" type="file" /> <input type="submit" id="regsubmit" value="注册" onclick="Check()" /> <h2>当注册ID为 tony的用户时,后台验证该ID已存在,返回提示信息<br /> 为突出显示无刷新效果,服务器端程序将自动进行百万加法运算 </h2> </body> </html>

[u]复制代码[/u][/url] 代码如下:

REG.JS function GE(a){return document.getElementById(a);} function Check(){ if(GE('regid').value==''){GE('msg').innerHTML='ID不能为空';return false} if(GE('regpassword').value==''){GE('msg').innerHTML='password 不能为空';return false} var X=new ActiveXObject("Msxml2.XMLHTTP"); if(X){ GE('regsubmit').disabled=true; X.onreadystatechange=function(){ if(X.readyState==4){ if(X.status==200){ eval(X.responseText) } else{GE('msg').innerHTML=X.statusText} } else{GE('msg').innerHTML="正在提交数据..."} }; X.open('POST','reg.asp',true); X.setRequestHeader('Content-Type','application/x-www-form-urlencoded'); var SendData = 'regid='+GE('regid').value+'®password='+GE('regpassword').value+'&file='+GE('f').value X.send(SendData) } else{ GE('msg').innerHTML='你的浏览器不支持XMLHttpRequest' } }

reg.asp

[u]复制代码[/u] 代码如下:

<%@ LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>//CODEPAGE必须为650001,否则也出现乱码,如果有HTML文字,一定设为UTF-8编码,否则将出现乱码.
<%
Dim regid, regpassword, str
regid=Request.Form("regid")
regpassword=Request.Form("regpassword")
f=Request.Form("file")
Dim i, ii
ii = 0
For i = 0 To 1000000
ii = ii + i
Next
If regid="" or regpassword="" then
str = "ID和PASSWORD必须填写"
Else
If regid <> "tony" Then
str = "注册成功,ID为" & regid & " , 密码为" & regpassword&f
Else
str = "注册失败,ID已经存在"
End If
End if
Response.Write "GE('msg').innerHTML='" & str & "';GE('regsubmit').disabled=false"
Response.End
%>

全部评论(0)

上一篇：收集asp的常用函数
下一篇：asp下实现批量插入数据的方法

Ajax+asp应用实例 注册模块，表单提交

Ajax+asp应用实例注册模块，表单提交