Jag har skrivit följande kod:

Dim DAODBEngine As New DAO.DBEngine
Dim Db As DAO.Database
Dim rsDb As DAO.Recordset
Dim rsDb2 As DAO.Recordset

Dim StepLength As Decimal
Dim Start As Decimal

Dim str1 As String
Dim str2 As String


Db = DAODBEngine.OpenDatabase(frmMax.txtPath.Text)

str1 = "SELECT scan_axis.record_inc FROM AcDF_MotionData WHERE rec_axes=1;"
str2 = "SELECT scan_axis.start FROM AcDF_MotionData WHERE rec_axes=1;"

rsDb = Db.OpenRecordset(str1)
rsDb2 = Db.OpenRecordset(str2)
StepLength = rsDb.Fields(0).Value
Start = rsDb2.Fields(0).Value

rsDb.Close()
rsDb2.Close()
Db.Close()

Tanken är att jag vill hämta ut två värden från en tabell i en databas, och sedan placera dem i variablerna StepLength och Start. Tabellen har bara två rader, en där rec_axes är 1 och en där rec_axes är 0. Jag vill hämta data från raden där rec_axes är 1, från kolumnerna scan_axis.record_inc
och scan_axis.start.
Men när jag kör ovanstående kod, fastnar den på raden:

rsDb = Db.OpenRecordset(str1)

Och följande felmeddelande uppstår: "För få parametrar angavs. 2 förväntades."

Och detta lyckas jag inte reda ut. Nån som vet vad felet kan bero på?

Det felet brukar bero på att man har stavat fel till något i SQL-frågan, troligtvis ett kolumn eller tabellnamn.

/Johan

Nu har jag kommit på vad det var. Det var inte att jag hade stavat fel, utan att tabellnamn med en punkt i tydligen är ogiltiga...