想做一个检测用户帐号，用于注册时，请问哪有例子，谢谢

[lianxiangpanjin4]

如上

[ziyulin0311]

Set RS=Server.CreateObject("ADODB.RecordSet")
RS.Open "admin where adminname='"&Trim(Request.Form("adminname"))&"'",Conn,1,1
If Not RS.eof Then
Response.Write("<script language='javascript'>alert('管理员帐号已存在，请另选帐号！');history.go(-1);</script>")
RS.Close
Response.End()
End If
RS.CLose

[youzi520]

程序设计中会经常碰到一种情况，就是事先无法得知用户会需要哪些数据，必须根据用户选择后再从服务器重新提取数据后反馈给用户。比如一简单的情况，用户选择省份以后，我们立即会在市里边将这个省的所有市重新显示出来。这种情况一般需要将整个页面刷新后才可以重新读取，但这样不仅效率不高外，也显得不太优雅。其实用javascript结合微软件的XMLHTTP对象，我们可以不用刷新，“稍稍”的就可以将数据从服务器上读取出来，显得既专业，又高效。
　　下面我们就以一个验证用户是否被注册的情况来演示这种技术。

　　1.首先在服务器上建立一个CheckUser.asp文件，用来检测用户是否存在，根据用户是否存在分别反馈0和1

u_name=Request.QueryString("u_name")
if u_name 存在 then
Response.write "0"
else
Response.write "1"
end if

　　2.客户端HTML设计:

　　一、JavaScript代码

<script language=javascript>
function check_user_exists(form){
u_name=form.u_name.value;
if (u_name==null||u_name==''){
alert("请您输入用户名");
return false;
}
infoBoard=document.getElementById("checkInfo");
infoBoard.innerText='查询中...';
myurl=location.protocol+"//"+location.hostname+"/CheckUser.asp?u_name="+u_name;
retCode=openUrl(myurl);
switch(retCode){
case "-2":
infoBoard.innerHTML='<font color=red>抱歉</font>,查询失败';break;
case "1":
infoBoard.innerHTML='<font color=red>恭喜</font>,'+u_name+'可以使用';break;
case "0":
infoBoard.innerHTML='<font color=red>抱歉</font>，用户名'+u_name+'已经被使用';
}
return;
}
function openUrl(url){
var objxml=new ActiveXObject("Microsoft.XMLHttp")
objxml.open("GET",url,false);
objxml.send();
retInfo=objxml.responseText;
if (objxml.status=="200"){
return retInfo;
}
else{
return "-2";
}
}
</script>

　　二、HTML表单设计:

<form name=form1 action="XXXX.asp" method="post">
<input type=text name=u_name><span id="checkInfo"></span><input type=button name=checkuser value="检测用户是否存在" onClick="check_user_exists(this.form);">
</form>

　　经过以上三步，一个不需要页面刷新的数据更新程序就完成了，按此方法，可以实现很多很酷的应用

[lianxiangpanjin4]

我要的是不需刷新就能测试的，我先看会 youzi520(釉子-MeChecksV) 的

[lianxiangpanjin4]

to youzi520(釉子-MeChecksV) ，不行啊，怎么有问题，帮我看看好吗？测试数据aaa为已注册

1.htm

<script language=javascript>
function check_user_exists(form){
u_name=form.u_name.value;
if (u_name==null||u_name==''){
alert("请您输入用户名");
return false;
}
infoBoard=document.getElementById("checkInfo");
infoBoard.innerText='查询中...';
myurl=location.protocol+"//"+location.hostname+"/CheckUser.asp?u_name="+u_name;
retCode=openUrl("CheckUser.asp");
switch(retCode){
case "-2":
infoBoard.innerHTML='<font color=red>抱歉</font>,查询失败';break;
case "1":
infoBoard.innerHTML='<font color=red>恭喜</font>,'+u_name+'可以使用';break;
case "0":
infoBoard.innerHTML='<font color=red>抱歉</font>，用户名'+u_name+'已经被使用';
}
return;
}
function openUrl(url){
var objxml=new ActiveXObject("Microsoft.XMLHttp")
objxml.open("GET",url,false);
objxml.send();
retInfo=objxml.responseText;
if (objxml.status=="200"){
return retInfo;
}
else{
return "-2";
}
}
</script>

<form name=form1 action="XXXX.asp" method="post">
<input type=text name=u_name><span id="checkInfo"></span><input type=button name=checkuser value="检测用户是否存在" onClick="check_user_exists(this.form);">
</form>

--------------------------------------
CheckUser.asp

<%
u_name=Request.QueryString("u_name")
if u_name="aaa" then
Response.write "0"
else
Response.write "1"
end if
%>

[samjuly]

retCode=openUrl("CheckUser.asp");
改为retcode=openurl(myurl)
要不然前面定义了myurl=没用
或者改称retcode=openurl(location.protocol+"//"+location.hostname+"/CheckUser.asp?u_name="+u_name)