<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="ljconn.asp"-->
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select sh,yhlx from reg where id="&request("id")&"",conn,1,3
rs("sh")=request("sh")
rs("yhlx")=request("hylx")
rs.update
rs.close
set rs=nothing
response.write "<script>alert('更改成功!请点击会员状态查看!');window.close();</script>"
response.End
conn.close
set conn=nothing
%>

