在个人信息表YX_User里已有的用户名(name)和刚输入推荐人（tuijianren）相同的话，则给这已有的用户名(name)个人信息里的积分（jifen）加一


set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [YX_User] where name='"&trim(request("tuijianren"))&"'",conn,1,1
if rs.recordcount>0 then



谢谢大家帮我看看这个怎么编写！

set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [YX_User] where name='"&trim(request("tuijianren"))&"'",conn,1,1
if rs.recordcount>0 then
这几句话可以用一句SQL语句来完成
conn.Execute("Update [YX_User] Set jifen=jifen+1 Where name='"&trim(request("tuijianren"))&"'")

谢谢版主，可以啦。