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

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/Code)
 Active Users add-on (User Status)
 New Topic  Topic Locked
 Printer Friendly
Previous Page
Author Previous Topic Topic Next Topic
Page: of 6

dibley
New Member

United Kingdom
91 Posts

Posted - 31 March 2004 :  17:22:06  Show Profile  Visit dibley's Homepage
David,

I have just used your code in my forum, and it works a treat. Just wanted to say thanks!

.:dib:.

www.nightsouls.co.uk - Uk clubber & music forum.
www.animatronica.co.uk - Creators of themepark animatronics.
Go to Top of Page

giorgiusx
Starting Member

28 Posts

Posted - 08 April 2004 :  03:17:49  Show Profile
Finally i place this mod on my forum and it works!
I add a little mod by which is possible send a PM to user ON-LINE, but, in privatesend.asp the name of user dont appear...
where is the mistake?????
here the code i add:

AUMemberStatus = "<font color=green><b>ON-LINE!</b></font><img src=icon_folder_new.gif><br><br><a href=privatesend.asp?mode=topic&mname=& rsAM('M_NAME') &><img src=icon_editor_email.gif border=0></a><br><font color=black>send a PM!</font>"
Go to Top of Page

giorgiusx
Starting Member

28 Posts

Posted - 08 April 2004 :  09:40:20  Show Profile
Nobody help me?
sigh!
Go to Top of Page

OneWayMule
Dev. Team Member & Support Moderator

Austria
4969 Posts

Posted - 08 April 2004 :  09:45:06  Show Profile  Visit OneWayMule's Homepage  Send OneWayMule an ICQ Message
First of all, be a little more patient, the fact you didn't receive a reply after 6 hours means nothing, remember the support here is free and people volunteer to help.
Also, since your problem comes from your own modification, you should have posted your problem in this forum.

Anyway, can you post a link to a .txt version of the file where you've made your modifications?

My MODs:
Birthdays - Custom Policy - F.A.Q. Administration - Forum Rules - Guestbook
Links Manager - MyOwnGoogle - Profile Views - Search Log - WebSearch

Useful stuff:
Forum and MOD Installation - MOD Installation Guide - Snitz v3.4.05 Readme - Free ASP Hosts - Support Snitz
Go to Top of Page

DavidRhodes
Senior Member

United Kingdom
1222 Posts

Posted - 08 April 2004 :  10:41:55  Show Profile
rsAM('M_NAME') isn't ASP and won't be executed in the code you have above, I don't even think there is a rsAM recordset?

try
AUMemberStatus = "<font color=""green""><b>ON-LINE!</b></font><img src=""icon_folder_new.gif""><br><br><a href=""privatesend.asp?mode=topic&mname=" & rsAM("M_NAME") & """><img src=""icon_editor_email.gif"" border=""0""></a><br><font color=""black"">send a PM!</font>"


The UK MkIVs Forum
Go to Top of Page

giorgiusx
Starting Member

28 Posts

Posted - 09 April 2004 :  05:07:13  Show Profile
ok, ok....sorry, sorry, sorry....

Simply i'm looking for system by which is possible send a PM to an user online, clicking on link to privatesend.asp directly from topic.asp where appear status of user, indicating the name of user who we want send PM...
I don't know if the code i writed is correct...(i copied it from another script regarding active user...)

My question is: is possible or not?
Here how appear mod:
www.ludogate.net/images/sendpm.jpg
("invia un PM" in english means "send a PM")
Go to Top of Page

masterao
Senior Member

Sweden
1678 Posts

Posted - 09 April 2004 :  07:35:29  Show Profile  Visit masterao's Homepage
Are you aware of that the PM mod already adds a PM-link to topic.asp. Why not move the location of that link to where you want it to appear? This should really be in its own topic, as it has nothing to do with the AU User Status add-on.

Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod
Go to Top of Page

autowizz
Starting Member

4 Posts

Posted - 10 April 2004 :  00:00:11  Show Profile
Ok I am new to this, so please bear with me.

I would like to install this mod, but I am having some trouble finding the exact spots to put the lines at.

Is there an easy way to install this stuff or should I keep searching??

Thanks,

Scott

This account was hacked into by Image, a very honest guy as you all can see! Stealing people's passwords is his pasttime. Beware of this, before you register at his forums!
Go to Top of Page

The Impact
Junior Member

Australia
398 Posts

Posted - 10 April 2004 :  01:35:50  Show Profile
Autowizz, what text editor are you using to edit the files ?

A text editor which shows line numbers and has a search function can make instructions simpler when adding Snitz MODs.

I know that Araneae is a good free editor.
Go to Top of Page

indianBoy
New Member

56 Posts

Posted - 08 June 2004 :  15:47:11  Show Profile  Visit indianBoy's Homepage  Send indianBoy an AOL message  Send indianBoy an ICQ Message  Send indianBoy a Yahoo! Message
i have added the functions as specified in the inc_fun_common file, the code and its nearby code looks as :


sub AUHandleLoging()
  strSql = "DELETE FROM " & strTablePrefix & "ACTIVE_USERS WHERE AU_IP = '" & Chkstring(request.ServerVariables("REMOTE_ADDR"), "SQLString") & "'"
  my_conn.execute (strSql)
end sub

function AUGetOnlineMembers()
	strSql ="SELECT " & strMemberTablePrefix & "ACTIVE_USERS.MEMBER_ID " 
	strSql = strSql & " FROM " & strMemberTablePrefix & "ACTIVE_USERS "
	if strAUAnon and not(bolOverride) then
	    strSql = strSql & ", " & strMemberTablePrefix & "MEMBERS WHERE "
	    strSql = strSql & strMemberTablePrefix & "MEMBERS.MEMBER_ID = " & strMemberTablePrefix & "ACTIVE_USERS.MEMBER_ID "
	    strSql = strSql & "AND " & strMemberTablePrefix & "MEMBERS.M_AUHIDE <> '0'"
	end if
	set rsOnline = my_Conn.Execute(strSql)
	If NOT rsOnline.EOF Then AUGetOnlineMembers = rsOnline.GetRows()
	rsOnline.close
	set rsOnline = nothing
end function

function AUMemberStatus(OnlineMembers, CurrentMember)
	if IsArray(OnlineMembers) then
		for intRow = 0 to UBound(OnlineMembers, 2)	
			if OnlineMembers(0,intRow) = CurrentMember then
				AUMemberStatus = "<font color=green><b>online</b></font>"
				exit function
			end if
		next
	end if
	AUMemberStatus = "<font color=red>offline</font>"
end function

 


function checkRadio(actualValue, thisValue, boltf)
  if actualValue = thisValue EQV boltf then
    checkRadio = " checked"
  else 
    checkRadio = ""
  end if
end function


also i have made the specified cnages in topic.asp which can be seen here :

http://www.xbhp.com/forum/topica.txt

Still all the users are showing OFFLINE!

Help!
Go to Top of Page

masterao
Senior Member

Sweden
1678 Posts

Posted - 09 June 2004 :  07:39:04  Show Profile  Visit masterao's Homepage
Do you have Anonymous members activated? If so, a member will not show up as online if they are anonymous.

You should have posted this in the Help: MOD Implementation, as this isn't a bug found in the mod, but with adding the mod to the forum.

Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod
Go to Top of Page

indianBoy
New Member

56 Posts

Posted - 10 August 2004 :  15:44:29  Show Profile  Visit indianBoy's Homepage  Send indianBoy an AOL message  Send indianBoy an ICQ Message  Send indianBoy a Yahoo! Message
i dont have anon. members activated
Go to Top of Page

masterao
Senior Member

Sweden
1678 Posts

Posted - 10 August 2004 :  21:01:48  Show Profile  Visit masterao's Homepage
You seem to have missed to add the following lines to topic.asp:

quote:

at the top of topic.asp, just before the forum sql begins (approx line 105)

'## Get online users into an array
arrOnlineMembers = AUGetOnlineMembers()
'## end



This shouldn't be posted here, as this is a problem implementing the mod and not a bug with the mod

Jan
===========
FR Portal Forums | Active Users 4.0.20 Mod
Go to Top of Page
Page: of 6 Previous Topic Topic Next Topic  
Previous Page
 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.16 seconds. Powered By: Snitz Forums 2000 Version 3.4.07