Hello dear all,
I'm , just because I got a errormsg and I don't know why.
pliiiiiiz help.

environment:
vb6 connected to access2k mdb
via ado (msado15.dll)

this is the pice of my code

[vba]
Me.Label_status.Caption = "status: del data from first point"
Me.Refresh

Dim conn As New ADODB.Connection
Dim cmd As New ADODB.Command
Dim rs As New ADODB.Recordset

conn.Open "DSN=MS Access adatb?zis;DBQ=" & App.Path & "\sinter.mdb;DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;PWD=admin;UID=admin;"

Set cmd.ActiveConnection = conn
cmd.CommandType = adCmdText

cmd.CommandText = "SELECT * FROM [rep1] where casetteID=?"

Set prm1 = cmd.CreateParameter("casetteID", adChar, adParamInput, Len(mainfrm2.Text_grafitID.Text), mainfrm2.Text_grafitID.Text)
cmd.Parameters.Append prm1
rs.Open cmd, , adOpenKeyset, adLockOptimistic
[/vba]

and this rs.open tell me the following err:
runtime error 3265 (and the hungarian error string)

thats means for me that the cmd query string have a incorrect clause.
but if it is not true?

I checked this again and again and all are good in the mdb

I have a table with "rep1" name
I have a field in the rep1 with "casetteID" name.

why I get this err?

many thanks to any help
regards