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")%>