www.gusucode.com > 星云DJ舞曲 4.5a源码程序 > admin/admin_sc2500add.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")+2500
    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"
%>