[RESOLVED] msAccess

[MintFlavor]

hi everyone
I'm new here and trust i can get helpful tips and precious support from u all.
I will try to hepl as far as I can too.

I am currently designing a db with msAccess. It's been some time since I last designed db's and programmed with VB - thus, numerous problems to solve!!

Well, I have one form which would not display any control at all on running it !!! ANyone know any property causing this?

I am also using a login form to the applic. Since I am using a table of users, I need to check user input against records in my table with:

Dim oRs As ADODB.Recordset
Dim sConn As String
Dim sSQL As String

sConn = "Provider='SQLOLEDB';Data Source='MySqlServer';" & _
"Initial Catalog='inforGT';Integrated Security='SSPI';"

Set oRs = New ADODB.Recordset
oRs.CursorLocation = adUseClient
oRs.Open "tblUsers", objConn, adOpenStatic, adLockOptimistic, adCmdTable

oRs.Find ("' & Username.text & '")
oRs.Find ("' & Password.text & '")


If oRs.EOF Then
MsgBox "Check your username and password again.", vbOKOnly, "inforGT"
Exit Sub
Else
stDocName = "Menu"
DoCmd.OpenForm stDocName, , , stLinkCriteria
End If

However, this is generating an error 3001 "Arguments are of the wrong type, out of range or in conflict..." with the line:
oRs.Open "tblUsers", objConn, adOpenStatic, adLockOptimistic, adCmdTable

I have various ways to resolve this login feature I am not used with DAO and ADO.
If anyone has a complete sample code for a login form (plus, "Change my password" feature wud b just gr8!)- thanks