www.gusucode.com > 星云DJ舞曲 4.5a源码程序 > admin/admin_sc1100add.asp
<!--#include file="conn.asp"--><!--#include file="checkadmin.inc"--><% id1=replace(request("id"),"","") if id1<>"" then set rs=server.createobject("adodb.recordset") id=id1 sql="select * from user where id in (" & id & ")" rs.open sql,conn,1,3 rs("points")=rs("points")+1100 rs.Update while not rs.eof %><% rs.movenext wend rs.Close set rs=nothing end if conn.close set conn=nothing response.redirect "admin_UserMana.asp" %>