Trying to fix up some of the non-functional code esp. this disabled line
line 107 to 114 and 151 to 158
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 )"
I found that this is a suitable replacement for the red line:
StrSql = StrSql & " OR '" & userip & "' NOT LIKE '%" & IPLIST_STARTIP & "%'" 'find matching ranges
Not quite sure why it takes a NOT LIKE rather then a LIKE but it seems to work fine. Strange. Anyone want to double check on their systems/confirm?