asp向数据库插入数据的方法rs

Set objRs = Server.CreateObject（"Adodb.Recordset"）
mysql = "select sname from [users] where sname = ""&sname&"""
objRs.open mysql,objConn,1,3

If objRs.Bof Or objRs.Eof Then
objRs.addnew
objRs（"sname"） = sname
objRs.update
Else
call salert（"该用户已经存在，不可以注册"）
End If