Questa
rsCheckUser.Open strSQL, adoCon If NOT rsCheckUser.EOF Then

va su 2 righe.
Posta quello che contiene il file


Roby