Access - Urgenete!!!

 
Vista:

Urgenete!!!

Publicado por Jesus Lopez (11 intervenciones) el 13/02/2004 12:26:05
He modificado la base de datos Neptuno y parace que hasta ahora bien,
ahora van saliendo algunos problemillas. Cuando voy al formulario de pedidos y realizo alguno, si quiero utilizar el boton de comando Imprimir factura me imprime todos los pedidos.Yo sólo quiero que imprima el que acabo de hacer y además quiero generar un informa de pedidos por fecha, como lo puedo hacer, adjunto el código de imprimir facturas que viene en Neptuno y que las imprime todas a la vez.
Muchísimas gracias
Jesus
Sub ImprimirFactura_Click()
' Este código está creado por el Asistente para botones de comando.
On Error GoTo Err_ImprimirFactura_Click

Dim cadNombreDocumento As String

cadNombreDocumento = "Factura"
' Informe Imprimir Factura, usa la consulta Fitro Facturas para imprimir la
' factura del pedido actual.
DoCmd.OpenReport cadNombreDocumento, acViewNormal, "Filtro facturas"

Salir_ImprimirFactura_Click:
Exit Sub

Err_ImprimirFactura_Click:
' Si el usuario cancela la acción, no mostrar un mensaje de error.
Const conErrDoCmdCancelado = 2501
If (Err = conErrDoCmdCancelado) Then
Resume Salir_ImprimirFactura_Click
Else
MsgBox Err.Description
Resume Salir_ImprimirFactura_Click
End If

End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Urgenete!!!

Publicado por Rick Hunter (263 intervenciones) el 13/02/2004 21:36:55
Checa el filtro.

Ojala y te sirva.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

sustituye "filtro facturas" por

Publicado por guiland (16 intervenciones) el 15/02/2004 15:11:17
Hola prueba con esto:
DoCmd.OpenReport cadNombreDocumento, acPreview, acViewNormal, "[IdPedido] =" & Me.IdPedido
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar