user_id=trim(replace(request("capitalid"),"'","’")) 如果capitalid是带有chr组合的字符串
那么以下代码出错
if user_id <> "" then
if len(user_id)<6 then
message="<font color=#ff3300>对不起!账号为6个字符以上</font>"
else
'开始检测是否已有此用户
set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM [Chnet_user] where name= '" & user_id & "'"
rs.open sql,conn,1,1
if not (rs.Bof or rs.eof) then
message="<font color=#ff3300>对不起!该帐号已经被注册,请选择别的登陆帐号!</font>"
else
message="<font color=#009900>恭喜您!该帐号可以注册</font>"
end if
rs.Close
set rs=nothing
end if
else
message="对不起!请您填写账号"
end if