asp ajax注册,AJAX_Ajax+asp应用实例 注册模块，表单提交，<!--注册模块-->default.asp 复 - phpStudy...

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

default.asp

复制代码 代码如下:

Ajax - Sample1

//请一定要将此页的编码设为UTF-8,否则将出现乱码

Ajax应用实例: 注册模块

ID:

Password:

当注册ID为 tony的用户时,后台验证该ID已存在,返回提示信息

为突出显示无刷新效果,服务器端程序将自动进行百万加法运算

复制代码 代码如下:

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+'&regpassword='+GE('regpassword').value+'&file='+GE('f').value

X.send(SendData)

}

else{

GE('msg').innerHTML='你的浏览器不支持XMLHttpRequest'

}

}

reg.asp

复制代码 代码如下:

//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

%>相关阅读:

妙用Win键 提升Windows Vista效率

使用CSS处理表格边框样式化

建立linux两用户之间的信任关系

HTTP 500 - 内部服务器错误(补充内容)

韩国商业网站设计分析

CSS实例教程:纯CSS实现圆角框

Windows 7将精简用户帐户控制UAC

在.net安装程序部署SQL Server数据库

Extjs学习笔记之七 布局

HTML网页图片标记学习教程

JS 面向对象之神奇的prototype

有分页功能的WEB打印

SQL Server对上亿表的排序和join的问题解决

一个用于网络的工具函数库