Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
 All Forums
 Community Forums
 Community Discussions (All other subjects)
 Getting stats into a .net grid view

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!
Before posting, make sure you have read this topic!

Screensize:
UserName:
Password:
Format Mode:
Format: BoldItalicizedUnderlineStrikethrough Align LeftCenteredAlign Right Horizontal Rule Insert HyperlinkInsert EmailInsert Image Insert CodeInsert QuoteInsert List
   
Message:

* HTML is OFF
* Forum Code is ON
Smilies
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Clown [:o)]
Black Eye [B)] Eight Ball [8] Frown [:(] Shy [8)]
Shocked [:0] Angry [:(!] Dead [xx(] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
   

T O P I C    R E V I E W
thermal_seeker Posted - 14 June 2010 : 17:36:39
If this is the wrong place to post this... I apologise

I am trying to get the Member count, Forum count, Topic count and post count into a .NET datagrid on a webpage outside of the forum. It seems that I cannot draw the info directly from the database tables, so would I have to create a page that writes the stats into a new database table and draw from that or is there a simple way to do this??
15   L A T E S T    R E P L I E S    (Newest First)
thermal_seeker Posted - 06 July 2010 : 03:01:21
no worries, and thank you.
HuwR Posted - 06 July 2010 : 02:31:28
I haven't forgotten :) just need to do some testing, will hopefully post it up in the next day or two
thermal_seeker Posted - 25 June 2010 : 05:21:22
no worries thank you

Dave
HuwR Posted - 25 June 2010 : 02:30:46
Sorry, been very busy with work, but will definitely sort it out for you over the weekend.
thermal_seeker Posted - 24 June 2010 : 14:48:04
Any luck with this yet Huw??

Dave
thermal_seeker Posted - 16 June 2010 : 17:34:00
Thanks Huw.. there really is no rush.... I'm snowed under with farming work at the moment :(
HuwR Posted - 16 June 2010 : 13:22:29
ok cool, will try and get it done this evening
thermal_seeker Posted - 16 June 2010 : 13:13:06
quote:
Originally posted by HuwR

I may not be able to show all that info as some of that relies on it using .net membership providers (members online for example)

also what version of .net is your site using?


.NET 2.0 (with 3.0 and 3.5 extensions installed)

I'm not worried about members online.. the 2 main ones would be the member count and forum count. The topic count would be a bonus.

ie. we currently have xxx members
there are xxx forums with xxx topics

That would do it nicely... I'm a plain and simple man

Thanks Huw

Dave
Carefree Posted - 16 June 2010 : 04:41:41
Whoops - read the request and ignored the parameters lol.
HuwR Posted - 16 June 2010 : 04:39:03
that is classic asp not .net
Carefree Posted - 16 June 2010 : 03:22:05
Here you go. You will have to change the connection string to point to your database (& the table prefixes if you modified them). Other than that, it will give you a table with your data.


<%
'###############################################################################
'##
'##			Snitz Forums 2000 v3.4.07
'##
'###############################################################################
'##
'## Copyright © 2000-06 Michael Anderson, Pierre Gorissen,
'##			Huw Reddick and Richard Kinser
'##
'## This program is free. You can redistribute and/or modify it under the
'## terms of the GNU General Public License as published by the Free Software
'## Foundation; either version 2 or (at your option) any later version.
'##
'## All copyright notices regarding Snitz Forums 2000 must remain intact in
'## the scripts and in the HTML output.	The "powered by" text/logo with a
'## link back to http://forum.snitz.com in the footer of the pages MUST
'## remain visible when the pages are viewed on the internet or intranet.
'##
'## This program is distributed in the hope that it will be useful but
'## WITHOUT ANY WARRANTY; without even an implied warranty of MERCHANTABILITY
'## or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
'## for more details.
'##
'## You should have received a copy of the GNU General Public License along
'## with this program; if not, write to:
'##
'##			Free Software Foundation, Inc.
'##			59 Temple Place, Suite 330
'##			Boston, MA 02111-1307
'##
'## Support can be obtained from our support forums at:
'##
'##			http://forum.snitz.com
'##
'## Correspondence and marketing questions can be sent to:
'##
'##			manderson@snitz.com
'##
'###############################################################################

'## Make sure to uncomment one of the strConnString lines and edit it so that it points to where your database is!

'strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("dbase/snitz_forums_2000.mdb")         '## MS Access 2000 using virtual path
'strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/USERNAME/db/snitz_forums_2000.mdb")  '## MS Access 2000 on Brinkster
'strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\inetpub\dbase\snitz_forums_2000.mdb"                   '## MS Access 2000 using physical path
'strConnString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("dbase/snitz_forums_2000.mdb")        '## MS Access 97 using virtual path
'strConnString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/USERNAME/db/snitz_forums_2000.mdb") '## MS Access 97 on Brinkster
'strConnString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=c:\inetpub\dbase\snitz_forums_2000.mdb"                  '## MS Access 97 using physical path
'strConnString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Server.MapPath("dbase/snitz_forums_2000.accdb")      '## MS Access 2007 using virtual path
'strConnString = "Provider=SQLOLEDB;Data Source=SERVER_NAME;database=DB_NAME;uid=UID;pwd=PWD;"                           '## MS SQL Server 6.x/7.x/2000 (OLEDB connection)
'strConnString = "driver={SQL Server};server=SERVER_NAME;uid=UID;pwd=PWD;database=DB_NAME"                               '## MS SQL Server 6.x/7.x/2000 (ODBC connection)
'strConnString = "Provider=SQLNCLI;server=SERVER_NAME;database=DB_NAME;uid=UID;pwd=PWD;"                                 '## MS SQL Server 2005 w/ SQL Native Client
'strConnString = "driver={MySQL ODBC 3.51 Driver};option=16387;server=SERVER_IP;user=UID;password=PWD;DATABASE=DB_NAME;" '## MySQL w/ MyODBC v3.51
'strConnString = "driver=MySQL;server=SERVER_IP;uid=UID;pwd=PWD;database=DB_NAME"                                        '## MySQL w/ MyODBC v2.50
'strConnString = "DSN_NAME"                                                                                              '## DSN

'###############################################################################
'## SELECT YOUR TABLE PREFIXES
'###############################################################################

strTablePrefix = "FORUM_"
strMemberTablePrefix = "FORUM_"

set my_Conn = Server.CreateObject("ADODB.Connection")
my_Conn.Open strConnString
strSql = "SELECT COUNT(TOPIC_ID) AS CNT FROM " & strTablePrefix & "TOPICS WHERE T_STATUS = 1 "
set rsTopic=my_Conn.Execute(strSql)
if not rsTopic.EOF then
	intTopicCount=rsTopic("CNT")
end if
rsTopic.Close
set rsTopic = Nothing
strSql = "SELECT COUNT(REPLY_ID) AS CNT FROM " & strTablePrefix & "REPLY WHERE R_STATUS = 1 "
set rsReply=my_Conn.Execute(strSql)
if not rsReply.EOF then
	intReplyCount=rsReply("CNT")
end if
rsReply.Close
set rsReply = Nothing
strSql = "SELECT COUNT(MEMBER_ID) AS CNT FROM " & strMemberTablePrefix & "MEMBERS WHERE M_STATUS = 1 "
set rsMembers=my_Conn.Execute(strSql)
if not rsMembers.EOF then
	intMemberCount=rsMembers("CNT")
end if
rsMembers.Close
set rsMembers = Nothing
strSql = "SELECT COUNT(FORUM_ID) AS CNT FROM " & strTablePrefix & "FORUM WHERE F_STATUS = 1 "
set rsForum=my_Conn.Execute(strSql)
if not rsForum.EOF then
	intForumCount=rsForum("CNT")
end if
rsForum.Close
set rsForum = Nothing
Response.write	"<table width=""60%"" align=""center"" border=""1"" bgcolor=""black"">" & vbNewLine & _
	"	<tr valign=""middle"">" & vbNewLine & _
	"		<td align=""center"" colspan=""4"" bgcolor=""ltcyan"">" & vbNewLine & _
	"			<font face=""arial"" size=""4"" color=""black"">Forum Statistics" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"	</tr>" & vbNewLine & _
	"	<tr valign=""middle"">" & vbNewLine & _
	"		<td align=""center"" width=""25%"" bgcolor=""ltgreen"">" & vbNewLine & _
	"			<font face=""arial"" size=""3"" color=""black""><b>Forums</b>" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"		<td align=""center"" width=""25%"" bgcolor=""ltgreen"">" & vbNewLine & _
	"			<font face=""arial"" size=""3"" color=""black""><b>Members</b>" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"		<td align=""center"" width=""25%"" bgcolor=""ltgreen"">" & vbNewLine & _
	"			<font face=""arial"" size=""3"" color=""black""><b>Posts</b>" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"		<td align=""center"" width=""25%"" bgcolor=""ltgreen"">" & vbNewLine & _
	"			<font face=""arial"" size=""3"" color=""black""><b>Topics</b>" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"	</tr>" & vbNewLine & _
	"	<tr valign=""middle"">" & vbNewLine & _
	"		<td align=""center"" width=""25%"" bgcolor=""white"">" & vbNewLine & _
	"			<font face=""arial"" size=""2"" color=""black""><b>"& intForumCount &"</b>" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"		<td align=""center"" width=""25%"" bgcolor=""white"">" & vbNewLine & _
	"			<font face=""arial"" size=""2"" color=""black""><b>"& intMemberCount &"</b>" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"		<td align=""center"" width=""25%"" bgcolor=""white"">" & vbNewLine & _
	"			<font face=""arial"" size=""2"" color=""black""><b>"& intTopicCount+intReplyCount &"</b>" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"		<td align=""center"" width=""25%"" bgcolor=""white"">" & vbNewLine & _
	"			<font face=""arial"" size=""2"" color=""black""><b>"& intTopicCount &"</b>" & vbNewLine & _
	"			</font>" & vbNewLine & _
	"		</td>" & vbNewLine & _
	"	</tr>" & vbNewLine & _
	"</table>" & vbNewLine
%>
HuwR Posted - 16 June 2010 : 03:10:33
I may not be able to show all that info as some of that relies on it using .net membership providers (members online for example)

also what version of .net is your site using?
HuwR Posted - 16 June 2010 : 03:09:09
I will make it into a control that you can just plonk on a page and configure via the webconfig, that should make it easier for you. What exactly do you want to be able to show, the control I have currently basically replicates the stats section at the bottom of default.asp
thermal_seeker Posted - 16 June 2010 : 01:15:09
Thanks HuwR
HuwR Posted - 15 June 2010 : 17:40:00
fairly simple, I have a usercontrol and some queries you can probably use, I'll dig them out

Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.11 seconds. Powered By: Snitz Forums 2000 Version 3.4.07