Hola buenas tardes os comento mi siguiente problema aver si me podeis ayudar:
Tengo exa una base de datos con un formulario q me da la posibilidad de imprimir varios informe segun la opcion elgida en un cuadro de opciones o ver la vista previa.. En mi ordenador funciona bien tengo el acces 2003 pero la base de datos esta en formato 2000 el problema esta en pasarselo a un compañero q tiene el access 2002 pero tbien trabaja con el formato 2000 el comando de vista previa funciona bien el q falla es el de imprimir q cada vez q se le da imprime pero se me cierra el acces con el error:
Microsoft Access ha detectado un problema y debe cerrarse Sentimos los inconvenientes ocasionados
Lo e intentado todo convertir mi base de datos a 2002 compilandola y nada de nada los informes si se imprimen bien si no utilizo ese formulario...
Espero q me podais ayudar xq me estoy volviendo loco.
El codigo del fromulario es:
Option Compare Database
Option Explicit
Private Sub Comando11_Click()
On Error Resume Next
Select Case CInt(Marco0)
Case 1
DoCmd.OpenReport "rptRiesgoClienteSaldo", acViewPreview
Case 2
DoCmd.OpenReport "rptRiesgo1ClienteSaldo", acViewPreview
Case 3
DoCmd.OpenReport "rptRiesgo2ClienteSaldo", acViewPreview
Case Else
DoCmd.OpenReport "rptRiesgo3ClienteSaldo", acViewPreview
End Select
End Sub
Private Sub Comando14_Click()
On Error GoTo Err_Comando14_Click
DoCmd.Close
Exit_Comando14_Click:
Exit Sub
Err_Comando14_Click:
MsgBox Err.Description
Resume Exit_Comando14_Click
End Sub
Private Sub Comando15_Click()
On Error Resume Next
Select Case CInt(Marco0)
Case 1
DoCmd.OpenReport "rptRiesgoClienteSaldo", acViewNormal
Case 2
DoCmd.OpenReport "rptRiesgo1ClienteSaldo", acViewNormal
Case 3
DoCmd.OpenReport "rptRiesgo2ClienteSaldo", acViewNormal
Case Else
DoCmd.OpenReport "rptRiesgo3ClienteSaldo", acViewNormal
End Select
End Sub
