Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Help Groups for Snitz Forums 2000 Users
 Help: MOD Implementation
 Private Messages MOD (help)
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

Rivelyn
Starting Member

1 Posts

Posted - 04 December 2005 :  18:56:36  Show Profile  Visit Rivelyn's Homepage
INC_HEADER.ASP
Add the following: (about line 260)

This code needs to be after the connection is opened near the top of the page and after
strDBNTUserName is defined. It needs to be placed before sForumNavigation() is called.



' Get Private Message count for display
if strDBType = "access" then
strSqL = "SELECT count(M_TO) as [pmcount] "
else
strSqL = "SELECT count(M_TO) as pmcount "
end if
strSql = strSql & " FROM " & strMemberTablePrefix & "MEMBERS , " & strTablePrefix & "PM "
strSql = strSql & " WHERE " & strMemberTablePrefix & "MEMBERS.M_NAME = '" & strDBNTUserName & "'"
strSql = strSql & " AND " & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strTablePrefix & "PM.M_TO "
strSql = strSql & " AND " & strTablePrefix & "PM.M_READ = 0 "

Set rsPM = my_Conn.Execute(strSql)
pmcount = rsPM("pmcount")

rsPM.close
set rsPM = nothing


I have no idea where the heck I am supposed to put this I see that it says around 260 however I do not want to break it, and so far the "about line#" has not been that close. Everthing else is very easy with the setup telling me where to look and what to change, untill I hit the above point, now I am lost, I have no idea where to put it. This is from the latest ver of Snitz downloaded earlier this week and I have put no other MOD's into it.

MOD: private_messages-34-340301 downloaded from SnitzBitz.com

Could someone please tell me where to put it, in a little more clear way then above?

Thanks(yes I'm new )

Edited by - Rivelyn on 04 December 2005 19:07:52

Soar
Junior Member

USA
197 Posts

Posted - 04 December 2005 :  21:18:44  Show Profile  Visit Soar's Homepage
Find this code:

if trim(strDBNTUserName) <> "" and trim(Request.Cookies(strUniqueID & "User")("Pword")) <> "" then
chkCookie = 1
mLev = cLng(chkUser(strDBNTUserName, Request.Cookies(strUniqueID & "User")("Pword"),-1))
chkCookie = 0
else
MemberID = -1
mLev = 0
end if

Place the PM code directly under it. That should do it.
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.32 seconds. Powered By: Snitz Forums 2000 Version 3.4.07