Salve a tutti ho un piccolo problema con le stampe in vb...
Ho creato il mio ODBC, il report ecc..
Quando però lacio dal stampa da codice vb non mi viene mostrato nesusn errore ma il report mi compare bianco.
Se però apro manualmente il report, eseguo il refresh e prova a rilanciare la stampa da programma mi visualizza correttamente l'antemprima di stampa del report.
Da cosa può dipendere? questo è il codice che utilizzo:
codice:Private Sub cmdStampa_Click() Dim toScreen As Boolean On Error GoTo checkerrore toScreen = True With cryInter .ReportFileName = App.Path + "\Richiesta_Reparto.rpt" .Connect = "FDSN=NomeFDSN;UID=Utente;PWD=Password" .SelectionFormula = "{Richieste.Numero}='" & TxtIdenRich.Text & "'" If toScreen Then .Destination = crptToWindow Else .Destination = crptToPrinter End If .WindowState = crptMaximized .Action = 1 End With Exit Sub checkerrore: Call Errore End Sub

Rispondi quotando