I'm sorry, but any attempt I would make to use that code as you posted it WOULD end up in either an error message or infinite recursion (and thus cause an error in a few milliseconds).
Heck, just this much ASP code will crash it:
Function checkUser( )
That gives the error message
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'checkUsert'
/DearAbby/junk2.asp, line 3
So I don't pretend to understand how that code could possibly have EVER worked. The database is irrelevant. The code, as you posted it, won't even compile.