DiCom Software - Customer Support

<%="Welcome, " & Session("svarNName")%>	Back to The DiCom Software Home Page

Sections:
Home
Profile
User Committees
Knowledge Base
Forums
Downloads
Support Request
Logout

Forums

Section Menu:

<% If Request.QueryString("FID") <> "" Then Response.Write "

Back to list

" 'dtBegin = timer varFID = Request.QueryString("FID") iMyForumID = varFID ShowForum iMyForumID 'dtEnd = timer 'print "

" 'print "Processing took " & formatnumber(dtend - dtbegin, 2) & " seconds." 'print "

" Else Response.Write "

Below is a list of Forums to choose from. Forums related to specific User Committees will also appear in that User Committee's Section.

" set cDB = new DBClass cDB.Open sConnForum sSQL = "SELECT Forums.ForumID, Forums.Title, PageURL, COUNT(MsgID) AS Total " & _ "FROM Forums " & _ "LEFT JOIN Messages " & _ "ON (Forums.ForumID = Messages.ForumID) " & _ "GROUP BY Forums.ForumID, Forums.Title, Forums.PageURL" set rs = cDB.GetRS(sSQL) print "

" print "" print "" print "" do while not rs.eof print "" print "" print "" print "" rs.movenext loop print "

Forum Title	Messages
" print "" print " " & rs("Title") & " " print "	" & rs("Total") & "

" print "

" End If %>