无论是发新贴还是回复,提交成功之后的页面会显示一段代码,刚才看到发新贴还未提交的时候也有:<br>
<br>
<br>
Time > 6000*60 and UserLevel<6 Then UserLevel = 6 '如果经验值大于5000并且级数<6则级数改为6 Next If Save_UserLevel <> UserLevel Then con.ExeCute ("Update LeadBBS_User set UserLevel=" & UserLevel & " where id=" & UserID) GBL_DBNum = GBL_DBNum + 1 End If End Function Main %>