www.gusucode.com > ASP+ACCESS学生论坛设计与实现(源代码+论文+开题报告) > ASP+ACCESS学生论坛设计与实现(源代码+论文+开题报告)\13学生论坛ASPAC\BBS\pay_topic_postforumid.asp
<!--#include file="conn.asp"--> <!-- #include file="inc/const.asp" --> <% Mybbs.Loadtemplates("") if request("chanWord")="" then Response.End If Not(Mybbs.Forum_ChanSetting(0)=1 And Mybbs.Forum_ChanSetting(7)=1) Then Response.End if Session("challengeWord")<>Trim(request("chanWord")) then Response.End Session("challengeWord")="" Dim rs set rs=Mybbs.execute("select top 1 * from Dv_ChallengeInfo") Dim MyForumID MyForumID=rs("D_ForumID") set rs=nothing %> <form name="redir" action="http://bbs.ray5198.com/addForum.jsp" method="post"> <INPUT type=hidden name="forumId" value="<%=MyForumID%>"> </form> <script LANGUAGE=javascript> <!-- redir.submit(); //--> </script>