dotNetHell.it - Forum - STAMPA VBNET

vbnet Profilo | Newbie

6 messaggi | Data Invio: ven 3 mar 2006 - 15:16

Ciao a tutti!!!!
Qualcuno saprebbe dirmi come posso stampare in vb.net + pagine? cioè intendo creare una pagina x ogni record di una tabella e stampare tutte le pagine

Rispondetemi vi prego, sono nei casini

mortenera Profilo | Junior Member

51 messaggi | Data Invio: ven 3 mar 2006 - 15:22

usa crystal report

Brainkiller Profilo | Guru

7.999 messaggi | Data Invio: ven 3 mar 2006 - 15:30

>Ciao a tutti!!!!
>Qualcuno saprebbe dirmi come posso stampare in vb.net + pagine?
>cioè intendo creare una pagina x ogni record di una tabella e
>stampare tutte le pagine

Ci sono le classi del namespace System.Drawing.Printing che ti agevolano nel lavoro di stampa.
Crea per ogni record un oggetto PrintDocument ed invialo alla stampante.
Ciao

David De Giacomi
Microsoft MVP
http://blogs.dotnethell.it/david/

vbnet Profilo | Newbie

6 messaggi | Data Invio: ven 3 mar 2006 - 15:34

No non uso crystal report ma il PrintDialog e il PrintDocument.

Private Sub Bt_Stampa_Funz_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bt_Stampa_Funz.Click
Try
AddHandler PrintDoc.PrintPage, AddressOf NewPrintPage
PrintDialog.Document = PrintDoc
If (PrintDialog.ShowDialog() = Windows.Forms.DialogResult.OK) Then
PrintDoc.Print()
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub

Nel NewPrintPage mi creo la pagina da stampare

vbnet Profilo | Newbie

6 messaggi | Data Invio: ven 3 mar 2006 - 15:34

No non uso crystal report ma il PrintDialog e il PrintDocument.

Private Sub Bt_Stampa_Funz_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bt_Stampa_Funz.Click
Try
AddHandler PrintDoc.PrintPage, AddressOf NewPrintPage
PrintDialog.Document = PrintDoc
If (PrintDialog.ShowDialog() = Windows.Forms.DialogResult.OK) Then
PrintDoc.Print()
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub

Nel NewPrintPage mi creo la pagina da stampare

vbnet Profilo | Newbie

6 messaggi | Data Invio: ven 3 mar 2006 - 15:37

Esatto uso proprio qll, il probl è che ogni volta che premo il bottone "stampa" gli dico di creare un nuovo documento ma in realtà ogni volta sovrascrive sempre lo stesso

vbnet Profilo | Newbie

6 messaggi | Data Invio: ven 3 mar 2006 - 15:40

questo è uno dei tanti pezzi di codice che ho provato a usare quando premo stampa....ma non funziona

Dim PrintDialog As System.Windows.Forms.PrintDialog = New System.Windows.Forms.PrintDialog
Dim PrintDoc As System.Drawing.Printing.PrintDocument = New System.Drawing.Printing.PrintDocument

Try
AddHandler PrintDoc.PrintPage, AddressOf NewPrintPage
PrintDialog.Document = PrintDoc
If (PrintDialog.ShowDialog() = Windows.Forms.DialogResult.OK) Then
PrintDoc.Print()
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try