quote:

---

Originally posted by reducks87

OK here is an update. Just like I suspected editing the Const LOGGED_OUT_PAGE = "default.asp" did not help. I want them redirected to the forum before they enter the chat room.
Also how can I edit the script in the main forum default page how many users are in the chat room?

---

quote:

---

Originally posted by n8pbm

I guess I am confused by what you want exactly. You said redirected before entering the chat. I assume they were already on the forum and clicked on a link to go to chat?

---

quote:

---

Also my zip file I have a include file that shows who is in the chat room. This is displayed like the statistics or active users are displayed. Not sure if that is what you want.

---

Open inc_header.asp

Find this at Line 40"

<!--#INCLUDE FILE="inc_func_common.asp" -->

Add this below it: (Change the path to where you have the chat directory.  The path below is for the chat directory to be a subfolder of the forum directory.  If the chat directory is a subfolder of the root directory then the path would be  ../chatfolder/inc.utilities.asp)

<!--#include file="Chat/inc.utilities.asp" -->

At line 258 find function openWindowHelp(url) 

	"function openWindowHelp(url) {" & vbNewLine & _
		"	popupWin = window.open(url,'new_page','width=470,height=200,scrollbars=yes')" & vbNewLine & _
		"}" & vbNewLine & _
		

Add this below it: Again the path needs to be changed in the 'mainwindow = window.open(""enter chat path/default.asp?.

		"// ConquerChat" & vbNewLine & _
		"function openChat() {" & _
		"var MainWindow = window.open (""chat/default.asp?UserName=" & strDBNTUserName & "&login=login&mode=userLogin""," & _
		"'ChatWindow','scrollbars=yes,width=800,height=550,top=0,left=0,resizable=yes');" & vbNewLine & _
		"}" & vbNewLine & _

Find this code at line 480:

	if strUseExtendedProfile then 
		Response.Write	"          <a href=""pop_profile.asp?mode=Edit""" & dWStatus("Edit your personal profile...") & " tabindex=""-1""><acronym title=""Edit your personal profile..."">Profile</acronym></a>" & vbNewline
	else
		Response.Write	"          <a href=""javascript:openWindow3('pop_profile.asp?mode=Edit')""" & dWStatus("Edit your personal profile...") & " tabindex=""-1""><acronym title=""Edit your personal profile..."">Profile</acronym></a>" & vbNewline
	end if

and add this code below it: 

	       
	if strDBNTUserName <> "" then
               	Response.Write	"        |" & vbNewline & _
				"        <a href=""javascript:openChat()""><acronym title=""Chat with other users..."">Chat</acronym></a>" & vbNewline
		if countUsers() <> 0 then
               		Response.Write 	"<font color=""#FF0000""> (" & countUsers() & ")</font>" & vbNewline
        	end if
        end if