Author |
Topic |
ROB
Junior Member
USA
347 Posts |
Posted - 15 April 2002 : 22:10:33
|
I've updated the PM Pager MOD code to be compatible with Nathan's Active Users 4.0 MOD.
5/17/02 - Updated to incorporate all additional changes mentioned in thread.
In pm_pop_pager.asp, search for this around line 47-48:
strSQL = strSql &"FROM " & strTablePrefix & "ONLINE " strSql = strSql & " WHERE Right(MEMBER_ID, 5) = 'Guests' " and replace it with: strSql = strSql & "FROM " & strTablePrefix & "ACTIVE_USERS " strSql = strSql & " WHERE Right(MEMBER_ID, 5) = '0' " then search for this around line 77:
'## Forum_SQL strSql ="SELECT " & strTablePrefix & "ONLINE.UserID, " & strTablePrefix & "ONLINE.M_BROWSE, " & strTablePrefix & "ONLINE.DateCreated " strSql = strSql & " FROM " & strMemberTablePrefix & "ONLINE " strSql = strSql & " ORDER BY " & strTablePrefix & "ONLINE.DateCreated DESC"
and replace with this:
'## Forum_SQL strSql = "SELECT ME.MEMBER_ID, ME.M_NAME, ME.M_AUHIDE, AU.AU_QUERYSTRING " & _ "FROM " & strTablePrefix & "ACTIVE_USERS AU, " & strMemberTablePrefix & "MEMBERS ME " & _ "WHERE AU.MEMBER_ID = ME.MEMBER_ID" Then find this (around line 101):
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID, " & strMemberTablePrefix & "MEMBERS.M_NAME, " & strTablePrefix & "ONLINE.UserID " strSql = strSql & " FROM " & strTablePrefix & "MEMBERS, " & strTablePrefix & "ONLINE "
and replace with this:
strSql = "SELECT " & strMemberTablePrefix & "MEMBERS.MEMBER_ID, " & strMemberTablePrefix & "MEMBERS.M_NAME, " & strTablePrefix & "ACTIVE_USERS.Member_ID " strSql = strSql & " FROM " & strTablePrefix & "MEMBERS, " & strTablePrefix & "ACTIVE_USERS " And finally, find this code around line 109:
Response.Write(" <a href=""Javascript:openWindowPM('pm_pop_send.asp?Mdest=" & rs("UserID") & "&method=Topic')"">") Response.Write(rs("UserID") & "</a> ") Response.Write("<a href=""Javascript:openWindowPM('pm_pop_send.asp?Mdest=" & rs("M_NAME") & "&method=Topic')"">") Response.Write("<img src=pm.gif border=0 width=11 height=17 align=absmiddle hspace=6>" & "</a><br>") and replace it with:
Response.Write(" <a href=""Javascript:openWindowPM('pm_pop_send.asp?Mdest=" & rs("M_NAME") & "&method=Topic')"">") Response.Write(rs("M_NAME") & "</a> ") Response.Write("<a href=""Javascript:openWindowPM('pm_pop_send.asp?Mdest=" & rs("M_NAME") & "&method=Topic')"">") Response.Write("<img src=pm.gif border=0 width=11 height=17 align=absmiddle hspace=6>" & "</a><br>") Finally, search and replace UserID with MEMBER_ID , and pm.gif with icon_pm.gif .
Note that this does not yet account for hidden/anonymous members, but it does get the basic pager functionality working again.
Jeff Hester http://www.bigblueball.com Absolutely everything about Instant Messaging & Chat
Edited by - rob on 18 May 2002 02:57:44 |
|
Pouyan
New Member
91 Posts |
Posted - 05 May 2002 : 16:38:11
|
Ok I Installed the PM Pager and updated it as you noted to make it work with AU4. I get the following error once clicked on "User Pager":
Microsoft JET Database Engine error '80040e37'
The Microsoft Jet database engine cannot find the input table or query 'FORUM_ONLINE'. Make sure it exists and that its name is spelled correctly.
/Forum/pm_pop_pager.asp, line 50
I do have PM and AU4 MODS installed. any suggestions ?
Thank you in advance... |
|
|
Pouyan
New Member
91 Posts |
Posted - 06 May 2002 : 00:20:10
|
Nathan,
I know you have recommended the following to people with similiar errors:
quote:
To fix it open up inc_top.asp and remove the # from the <!--#file include="inc_activeusers.asp"-->
Then go to Admin Options>Mod Setup and run the active users file.
Then put the # sign back in where you took it out.
but in my case, both AU4 & PM MOD work fine. What do you think ?
|
|
|
ROB
Junior Member
USA
347 Posts |
Posted - 06 May 2002 : 13:42:01
|
Was the PM MOD working ok previously? What is the URL to your site?
Jeff Hester http://www.bigblueball.com Absolutely everything about Instant Messaging & Chat |
|
|
Pouyan
New Member
91 Posts |
Posted - 06 May 2002 : 17:19:09
|
ROB,
Yes, both AU4 and PM MOD worked fine and they are still working fine. It is just the PM Pager that is not working.
http://www.gmupersian.com
thank you
Edited by - Pouyan on 06 May 2002 17:32:40 |
|
|
ROB
Junior Member
USA
347 Posts |
Posted - 07 May 2002 : 13:59:33
|
Ok, but was the PM Pager MOD previously working?
I went back and looked and it appears that you missed a few edits from my first post. You'll see that the OLD pm_pop_pager.asp did a SELECT FROM FORUM_ONLINE, but I changed that to SELECT FROM FORUM_ACTIVE_USERS.
Check the first post again and make sure you've got all the edits. If you still can't get it going, post your pm_pop_pager.asp so I can see where the problem is.
Jeff Hester http://www.bigblueball.com Absolutely everything about Instant Messaging & Chat
Edited by - rob on 07 May 2002 14:22:01 |
|
|
Pouyan
New Member
91 Posts |
Posted - 07 May 2002 : 15:50:47
|
ROB,
No, this is the first time I am trying to install PM Pager MOD. I did not have it installed previously.
Line 47-50 of pm_pop_pager:
strSql = strSql & "FROM " & strTablePrefix & "ONLINE " strSql = strSql & " WHERE Right(UserID, 5) = 'Guest' "
Set rsGuests = my_Conn.Execute(strSql)
You have not mentioned any changes for line 47-50 in your first post. Error is on line 50. On line 47, I tried changing "ONLINE " to "Active Users " and now I have:
Microsoft JET Database Engine error '80040e10'
No value given for one or more required parameters.
/PersianClub/Forum/pm_pop_pager.asp, line 50
|
|
|
Pouyan
New Member
91 Posts |
Posted - 07 May 2002 : 17:53:15
|
OK, finally got it.
In pm_pop_pager.asp on line 47 find this:
strSql = strSql & "FROM " & strTablePrefix & "ONLINE "
and replace it with this:
strSql = strSql & "FROM " & strTablePrefix & "ACTIVE_USERS "
Then use the find/replace tool to find and replace: UserID with: MEMBER_ID throughout the page.
Use find/replace to replace: pm.gif with: icon_pm.gif
and that should make it work. We also need to get the old icons somehow (pm_dead.gif, etc,) since they don't come with PM MOD. ROB, any idea where I can get those?
Edited by - Pouyan on 07 May 2002 18:24:53 |
|
|
ROB
Junior Member
USA
347 Posts |
Posted - 12 May 2002 : 15:14:13
|
Here are the gif files I'm using:
- pm.gif - icon_pm.gif - icon_pmdead.gif
I realized that the PM Pager needs more work to be truly compatible with Active Users 4.0... It currently does not "hide" users who want to browse anonymously (if you've configured Active Users MOD to allow that). It shows the member names regardless of the user setting. Maybe a good time to just go through the whole dang thing.
Jeff Hester http://www.bigblueball.com Absolutely everything about Instant Messaging & Chat |
|
|
DreaMasteR
Starting Member
36 Posts |
Posted - 13 May 2002 : 22:22:20
|
with the new security updates a lot more will be needed.
I rcvd Sorry, there is no one registered with that MemberName:
When I tried to PM after using the mod and applying the pager fixes. - I'll keep working on it.
|
|
|
ROB
Junior Member
USA
347 Posts |
Posted - 14 May 2002 : 16:17:51
|
Hmmm... I've got all the security updates installed at my site and it is working. I don't think the updates are the problem.
Jeff Hester http://www.bigblueball.com Absolutely everything about Instant Messaging & Chat |
|
|
DreaMasteR
Starting Member
36 Posts |
Posted - 14 May 2002 : 19:27:28
|
Sorry, I should of elaborated -
The mod is having me send the message to the User number istead of the member name. I have time today, so I'm going to go look into it.
|
|
|
DreaMasteR
Starting Member
36 Posts |
Posted - 14 May 2002 : 20:00:00
|
Got it - Had to change the lines around 109 to this:
Response.Write(" <a href=""Javascript:openWindowPM('pm_pop_send.asp?Mdest=" & rs("M_NAME") & "&method=Topic')"">") Response.Write(rs("M_NAME") & "</a> ") Response.Write("<a href=""Javascript:openWindowPM('pm_pop_send.asp?Mdest=" & rs("M_NAME") & "&method=Topic')"">") Response.Write("<img src=icon_pm.gif border=0 width=11 height=17 align=absmiddle hspace=6>" & "</a><br>")
I'll work on the "Guests" part now.
|
|
|
DreaMasteR
Starting Member
36 Posts |
Posted - 14 May 2002 : 20:23:11
|
Got it -
Around line 48 change strSql = strSql & " WHERE Right(MEMBER_ID, 5) = 'Guests' "
to
strSql = strSql & " WHERE Right(MEMBER_ID, 5) = '0' "
Working fine for me Now!
|
|
|
bugzy
Junior Member
USA
147 Posts |
Posted - 17 May 2002 : 14:28:36
|
this post totally helped me
only you guys should edit the first post with the proper edits
------ www.azian.com |
|
|
stwilson
Junior Member
USA
385 Posts |
Posted - 10 June 2002 : 01:27:37
|
I have a new problem that just recently started to happen. I recently switched hosts (now on UK host) and am not sure if that is the problem.
My pager still works but it does not page until a long time, like 10 minutes. You can switch between screens in the forum and it will not page. Then about 10 minutes later it will.
Any ideas?
STW
|
|
|
Topic |
|