tabla - Crear conjunto de registros en VBA con instrucción SQL

ordenar y agrupar los datos en access

Question

Estoy intentando crear un conjunto de registros en Access VBA que me mostrará todos los registros en una tabla relacionada con el registro actual de un formulario. Mi código actual se ve así:

Private Sub Form_Load()
Dim rst As Recordset
Set rst = CurrentDb.OpenRecordset("Select [ID], [Ln] From [Order Detail] Where ((([Order Detail].[ID]) = [Forms]![Order Data Entry Header]![ID]))")
rst.MoveLast
Forms![Order Data Entry Header].LineNum = rst![Ln]
End Sub

Estoy haciendo esto para que al agregar nuevos registros puedan numerarse secuencialmente después del número más alto. Cuando ejecuto el formulario, aparece "Error en tiempo de ejecución: ''3061'' Demasiados parámetros. Esperado 1." en la primera línea.

Cualquier ayuda sería apreciada.

Answer 1

El problema es el hecho de que la cadena que ve allí es exactamente lo que se pasa al controlador.

Necesitas "construir" la cadena, así:

Set rst = CurrentDb.OpenRecordset("Select [ID], [Ln] From [Order Detail] Where ((([Order Detail].[ID]) = " & [Forms]![Order Data Entry Header]![ID] & "))")

¡Mire para asegurarse de que [Forms]! [Order Data Entry Header]! [ID] es contenido seguro, ya que está creando una declaración SQL.