Stampa report

[skylab]

Ciao ragazzi,
potreste aiutarmi????
Dovrei stampare un report via codice, dichiarando le dimensioni del foglio, dle carattere, ecc...
COme posso fare????

[skylab]

nessuno mi puo aiutare????????

[ale500]

..questo è per richiamare un report di Access...

Dim objAccess As Object
Private Sub Command1_Click()
Dim dbName As String
Dim rptName As String
Dim Preview As Long
Const acNormal = 0
Const acPreview = 2
dbName = "prova.mdb"
rptName = "Nome_Report"
Preview = acPreview 'acNormal
With objAccess
    .OpenCurrentDatabase filepath:=dbName
    If Preview = acPreview Then
       .Visible = True
       .DoCmd.OpenReport rptName, Preview
    Else
       .DoCmd.OpenReport rptName
    End If
End With
End Sub
Private Sub Form_Load()
Set objAccess = CreateObject("Access.Application")
End Sub
Private Sub Form_Unload(Cancel As Integer)
On Error Resume Next
objAccess.Quit
On Error GoTo 0
Set objAccess = Nothing
End Sub

[skylab]

Grazie mille ale500 per la tua attenzione,
ma come faccio a dargli le dimensioni del foglio???
Ti spiego, io dovrei stampare su di un modulo continuo(con un particolare formato), come faccio ad allineare il report al modulo???

[ale500]

questo è solo un modo per richimare un report di access...

nel tuo caso la cosa si complica e di non poco...

dovresti usare il report di Vb oppure, ancora più complicato l'oggetto printer di VB (un vero mattone)