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
 IPGate Logging Not Working
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

KMC
Starting Member

40 Posts

Posted - 20 January 2003 :  02:22:22  Show Profile
I have IPGate installed and everything seems to be installed correctly. However the logging feature is not working. Nothing is being logged. I've seen that others have also had this problem and I've tried the fixes suggested but it's still a no go.

I've included <!--#INCLUDE FILE="inc_ipgate.asp"--> first at line 235 then at line 236 of inc_header.asp....

quote:

Response.Write "<html>" & vbNewline & vbNewline & _
"<head>" & vbNewline & _
"<title>" & GetNewTitle(strScriptName) & "</title>" & vbNewline
<!--#INCLUDE FILE="inc_ipgate.asp"-->
'## START - REMOVAL, MODIFICATION OR CIRCUMVENTING THIS CODE WILL VIOLATE THE SNITZ FORUMS 2000 LICENSE AGREEMENT



I can't figure out what the problem is.

Help!???

Heynow
Junior Member

374 Posts

Posted - 20 January 2003 :  09:28:56  Show Profile  Visit Heynow's Homepage  Send Heynow an AOL message  Send Heynow a Yahoo! Message
I have mine under WriteFooter and works fine for me.


Political Forums
:::Stay n Chat
Go to Top of Page

KMC
Starting Member

40 Posts

Posted - 20 January 2003 :  12:49:49  Show Profile
Thanks. I just tried it and it's still not working. I'm about to give up.
Go to Top of Page

Chuck McB
Junior Member

WooYay
196 Posts

Posted - 20 January 2003 :  19:50:32  Show Profile  Visit Chuck McB's Homepage  Send Chuck McB an ICQ Message
try using


%>
<!--#INCLUDE FILE="inc_ipgate.asp"-->
<%
Go to Top of Page

KMC
Starting Member

40 Posts

Posted - 21 January 2003 :  00:30:36  Show Profile
That did it!!!! Oh, I could kiss you Chuck McB!! Thank you so much!!!!
Go to Top of Page

Chuck McB
Junior Member

WooYay
196 Posts

Posted - 21 January 2003 :  12:05:07  Show Profile  Visit Chuck McB's Homepage  Send Chuck McB an ICQ Message
\o/
Go to Top of Page

KMC
Starting Member

40 Posts

Posted - 21 January 2003 :  13:26:51  Show Profile
Ooooh Chuck, if you're still out there, I've run into a new problem. Since adding that code numerous people have been unable to access board when Banning is set to ON, even though no one's been banned. The error message they get is....

quote:

Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/forum/inc_ipgate.asp, line 160



Any clue....anyone??

Go to Top of Page

Chuck McB
Junior Member

WooYay
196 Posts

Posted - 21 January 2003 :  17:06:37  Show Profile  Visit Chuck McB's Homepage  Send Chuck McB an ICQ Message
these are the lines just before 160 do they match yours?


		Set rs2 = Server.CreateObject("ADODB.Recordset")

		StrSql = "SELECT IPLIST_STARTDATE, IPLIST_ENDDATE, IPLIST_STATUS, IPLIST_DBPAGEKEY " 
		StrSql = StrSql & "FROM " & strTablePrefix & "IPLIST"
		StrSql = StrSql & " WHERE ('" & userip & "' = IPLIST_STARTIP" 'find matching ips
		StrSql = StrSql & " OR '" & userhost & "' = IPLIST_STARTIP" 'find matching hosts
		'StrSql = StrSql & " OR instr('" & userip & "', IPLIST_STARTIP) <> 0" 'find matching ranges
		StrSql = StrSql & " OR '" & strDBNTUserName & "' = IPLIST_MEMBERID" 'find matching members
		StrSql = StrSql & ") AND ('" & userdate & "' >= IPLIST_STARTDATE" 
		StrSql = StrSql & " AND '" & userdate & "' <= IPLIST_ENDDATE )" 

		rs2.Open StrSql, strConnString 
Go to Top of Page

KMC
Starting Member

40 Posts

Posted - 21 January 2003 :  17:26:25  Show Profile
This is what I had....

quote:
Set rs2 = Server.CreateObject("ADODB.Recordset")

StrSql = "SELECT IPLIST_STARTDATE, IPLIST_ENDDATE, IPLIST_STATUS, IPLIST_DBPAGEKEY "
StrSql = StrSql & "FROM " & strTablePrefix & "IPLIST"
StrSql = StrSql & " WHERE ('" & userip & "' = IPLIST_STARTIP" 'find matching ips
StrSql = StrSql & " OR '" & userhost & "' = IPLIST_STARTIP" 'find matching hosts
StrSql = StrSql & " OR instr('" & userip & "', IPLIST_STARTIP) <> 0" 'find matching ranges
StrSql = StrSql & " OR '" & strDBNTUserName & "' = IPLIST_MEMBERID" 'find matching members
StrSql = StrSql & ") AND ('" & userdate & "' >= IPLIST_BEGINDATE"
StrSql = StrSql & " AND '" & userdate & "' <= IPLIST_ENDDATE )"

rs2.Open StrSql, strConnString


I replaced it with what you posted, logged out and got this....

quote:
Microsoft VBScript runtime error '800a000d'

Type mismatch: '[string: ""]'

/forum/inc_ipgate.asp, line 167
Go to Top of Page

KMC
Starting Member

40 Posts

Posted - 21 January 2003 :  17:27:31  Show Profile
Forgot to add that I turned Banning On before logging out.
Go to Top of Page

Chuck McB
Junior Member

WooYay
196 Posts

Posted - 21 January 2003 :  18:14:43  Show Profile  Visit Chuck McB's Homepage  Send Chuck McB an ICQ Message
you running MySQL?

If so check out about 3/4 down this page
Go to Top of Page

KMC
Starting Member

40 Posts

Posted - 21 January 2003 :  18:47:20  Show Profile
Nope. MS Access 2000 using virtual path
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.24 seconds. Powered By: Snitz Forums 2000 Version 3.4.07