[code]Select Case auth ' auth is true/false '================
Case True
'--------------------
Debug.Print auth
If Not IsNull(s3) Then 's3 exists
Set rs = Nothing
Exit Sub
Else 's3 is null so get sial &pw
s3 = rs.Fields![serialnum]
Debug.Print s3
s4 = rs.Fields![password]
End If
Set rs = Nothing
Exit Sub 'onload() don 't need to check sn/pw
'-------------------------
Case False 'auth is false not authorized
'= = = = = = = = = = =
If (s3 = Null Or s4 = Null) Then ' serial is null or password is null
GettSerial 'which also calls gettauthcode(s3)
Debug.Print s3
Debug.Print s4
rs.Fields![seralnum] = s3
Call gettauthcode(s3)
Me.[chkauth] = False
rs.Fields![Authorized] = False
End If
End Select
================
as i debug, when i get to the if(s3 = null or.....does not execute or err but instead branches to the endif. what's up with that?