<%@LANGUAGE=VBSCRIPT%> <%page_title="eArio | Auto forum, discussion board"%> eArio | Forum - Auto Service, Car Service <%=page_title%> <% call openConnection() set cmd=Server.CreateObject("ADODB.Command") set RS=Server.CreateObject("ADODB.Recordset") set cmd.ActiveConnection=conn cmd.CommandType=4 cmd.CommandText="mb_getDiscussionTypes" set RS=cmd.Execute set cmd=nothing %>
        Home   |   Help   |   Rules  
   
<% if RS.EOF then %> <% end if while not RS.EOF %> <% set cmd=nothing%> <% RS.MoveNext() wend call closeConnection() %>
<%if session("ValidUser")<>"" then %> <%else%> <%end if%>   To view messages click on discussion title or folder.
No Discussion categories in the database.
&ForumName=<%Response.Write RS("Type_Name")%>"> : <% Response.Write RS("Type_Name") %>
<% Response.Write RS("Type_Description") %>
<%dim value1 set cmd=Server.CreateObject("ADODB.Command") set cmd.ActiveConnection =conn cmd.CommandText ="mb_selectTotalDiscussionsAmount" cmd.CommandType =4 cmd.Parameters.Append cmd.CreateParameter("Type_ID",3,1,,RS("Type_ID")) cmd.Parameters.Append cmd.CreateParameter("TotalCount",3,2,,value1) cmd.Execute %> Total Number of Discussion Topics : <%=cmd.Parameters("TotalCount")%>