Change the code to this and tell me what the values in debug are

With rstUser
.ActiveConnection = myConn
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockPessimistic
.Source = "SELECT * FROM user"
debug.print .source
debug.print myconn.state
.Open
End With