<% 'Option Explicit Dim section,sql,username,level,forumid,rsForum username = Request.Cookies("junooni_userid") level = Request.Cookies("junooni_level") forumid = Request.QueryString("forumid") %> <% Call Connjunooni(Conn) if not loginstatus(username)Then response.redirect "login.asp" end if sql = "SELECT * FROM forums WHERE forumid = " & forumid Set rsForum = Server.CreateObject("ADODB.Recordset") rsForum.Open sql, conn, 3, 3 %>
Post new topic
<%if username <> "" then%> <%if CInt(level) < rsForum("level") then%>

Sorry, you do not have posting privaledges in this forum.

<%else%>
Name <%=username%>
Icon              
Subject
Message BoldItalicUnderlineInsert QuoteInsert ImageHappy :)Sad :(Laugh :DWink ;)razz :pAngry >:(Shocked 8O
<%end if%> <%else%>

You must be logged in to post a topic.

<%end if%> <% rsForum.close set rsForum = nothing conn.close set conn = nothing %>