<!--#include file="setup.asp"-->
<%
top
if Request.Cookies("username")=empty then error2("请登录后再进行操作！")
id=int(Request("id"))
forumid=Conn.Execute("Select forumid From forum where id="&id)(0)
if membercode > 3 then
pass=1
elseif instr("|"&Conn.Execute("Select moderated From [bbsconfig] where id="&forumid&" ")(0)&"|","|"&Request.Cookies("username")&"|")>0 then
pass=1
end if
if pass<>1 then error("<li>您的权限不够")
username=Conn.Execute("Select username From [forum] where id="&id&"")(0)
response.write "<form action=manage.asp method=get id=chengfa>"%>
<table width="<%=dkuan%>" border="0" align="center" cellspacing="0" class="a3">
  <tr> 
    <td height="25" colspan="2" class="a1"> <div align="center">惩罚设置</div></td>
  </tr>
  <tr> 
    <td width="50%" height="25"> <div align="center">扣除经验：</div></td>
    <td height="25"> <input name="expery" type="text" id="expery" size="3" maxlength="3">
      介于0-100之间 
      <input name="menu" type="hidden" id="menu" value="chengfa"></td>
  </tr>
  <tr> 
    <td height="25"> <div align="center">扣除金钱：</div></td>
    <td height="25"> <input name="moneyy" type="text" size="3" maxlength="3">
      介于0-100之间
      <input name="id" type="hidden" id="id" value="<%=id%>"></td>
  </tr>
  <tr> 
    <td height="25"> <div align="right">
        <input type="submit" value="提交">
        &nbsp; </div></td>
    <td height="25">&nbsp;&nbsp;&nbsp; 
      <input type="reset" value="重置"> </td>
  </tr>
</table>
</form>