Info:
"PrimaryKey" = If as 4 columns

according to my code, I get an error-type error-

How to Search with a 4 column index?

Source Code:
dim db as new adodb.connection
dim tbData as new adodb.recordset

db.Provider = "Microsoft.ACE.OLEDB.12.0"
db.Open("Data Source=c:\MyDB.accdb)

With tbQua
.ActiveConnection = db
.CursorType = ADODB.CursorTypeEnum.adOpenKeyset
.LockType = ADODB.LockTypeEnum.adLockOptimistic
.CursorLocation = ADODB.CursorLocationEnum.adUseServer
.Open("Zahlen_Quadro_Temp", db, , , ADODB.CommandTypeEnum.adCmdTableDirect)
.Index = "PrimaryKey"
End With

aArr={1,2,3,4}

tbQua.seek (aArr, ADODB.SeekEnum.adSeekFirstEQ)

.....


Thanks
Andreas