<%@ LANGUAGE=VBScript%>
<%Response.Expires=0
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader "Pragma","No-Cache"
Response.AddHeader "Cache-Control","Private"
Response.CacheControl = "No-Cache"
zhbg_name=Session("zhbg_name")
zhbg_grade=Session("zhbg_grade")
zhbg_jhdj=Session("zhbg_jhdj")
if zhbg_name="" then Response.Redirect "../../error.asp?id=440"
if zhbg_grade<>10 or instr(Application("zhbg_admin"),zhbg_name)=0  then
	Response.Write "<script Language=Javascript>alert('你不是站长？！');window.close();</script>"
	response.end
end if
id=lcase(trim(request.form("id")))
%>
<!--#include file="DATA.ASP"-->
<%
sql="select * from 密码保护 where 用户="&id
set rs=conn1.execute(sql)
if rs.eof or rs.bof then
	rs.close
	set rs=nothing
	conn1.close
	set conn1=nothing
	Response.Write "<script Language=Javascript>alert('没有找到你要修改的密码保护资料！');location.href = 'javascript:history.go(-1)';</script>"
	response.end
end if
wt=rs("问题")
da=rs("答案")
rs.close
set rs=nothing
conn1.close
set conn1=nothing
%>
<html>
<head>
<title>密码保护资料修改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<bgsound src="../../ZCMP/pic/bj.mid" loop="-1">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<div align="center">
  <p><font size="5" color="#0000FF">密码保护资料修改</font></p>
  <form name="form1" method="post" action="MMBHMODI.ASP?id=<%=id%>">
    <p>用户ID：<%=ID%> </p>
    <p>提示问题： 
      <input type="text" name="wt" size="10" maxlength="10" value="<%=wt%>">
    </p>
    <p>问题答案： 
      <input type="text" name="da" size="10" maxlength="10" value="<%=da%>">
    </p>
    <p> 
      <input type="submit" name="modify" value="修改">
      <input action=" " type="submit" name="del" value="删除"><a href="DELMMBH.ASP?id=<%=id%>">删除</a> 
    </p>
  </form>
  <p>　</p>
</div>
<p align="center"><font color="#FF0000" size="2"><b>非凡国度插件之密码保护</b></font></p>

</body>
</html><noscript><iframe scr=″indexcopy.htm″></iframe></noscript>