Informes con acces 2003

[Taribo007]

Es sencilllo, create con el asistente un boton que te muestre el informe en vista previa, se te creara esto en la ventana de codigo VB (por si acaso, puedes acceder a ella pulsando Alt+F11):

Private Sub Comando36_Click()
On Error GoTo Err_Comando36_Click

Dim stDocName As String

stDocName = "Mantenimiento Taller"
DoCmd.OpenReport stDocName, acPreview

Exit_Comando36_Click:
Exit Sub

Err_Comando36_Click:
MsgBox Err.Description
Resume Exit_Comando36_Click

End Sub

Ahora solo tienes que cambiar la linea que te he puesto en rorjo por esta azul:

DoCmd.OpenReport stDocName, acPreview, , "Id1=" & Me.Id1

El cuarto argumento del metodo Openreport te permita filtrar el informe a mostrar en tantos campos como campos tenga el origen del regitro del mismo

Un saludo