asp判断用户是否存在_asp判断用户是否注册代码

 代码如下

<%
Dim conn,rs
Dim connstr
Dim sqlCmd
Dim userName

"得到用户名查询字符串
userName=Request.QueryString("userName")

"创建数据库连接对象并打开
set conn=server.createobject("adodb.connection")
connstr="Provider=Microsoft.jet.oledb.4.0;data source=" & server.mappath("data.mdb")
conn.open connstr

"创建数据集对象
set rs=server.createobject("adodb.recordset")

"查询用户名等于指定值的记录
sqlCmd="select id from user where userName="" & userName & """
rs=conn.execute(sqlCmd)

//定义变量表示用户名是否存在
Dim exist

//根据是否有数据判断用户名是否存在
if rs.eof then exist=1 else exist=0

//关闭数据库连接
rs.close
conn.close
set rs=nothing
set conn=nothing

//将结果返回
Response.write(exist)
%>

 

asp判断用户是否存在_asp判断用户是否注册代码

http://m.bbyears.com/jiaocheng/19188.html

推荐访问: