[VB6] Invocare applicazione Access e accedere a report

[cusolo]

Salve sono un nuovo utente che ha imparato visual basic autonomamente.

Ho un problema a come fare la visualizzazione dei report da me creati su un database che utilizzo all' interno del mio programma Vb con riferimenti Microsoft Data Formatting Object Library 6.0 (sp6) e Microsoft Access 10.0 Object Library.

Praticamente
1.non riesco a richiamare l'applicazione Access già in utilizzo nel mio programma
2. non so come poter richiamare nella lista degli oggetti access la voce Report .

Quello che sono riuscito a fare finora è impostare la connection string per lavorare i dati e tutto con:

Public Sub ApriDatabase()
     Database = App.Path & "\Database\Fatture.mdb"
     Set Cn = New Connection
     Cn.CursorLocation = adUseClient
     Cn.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source= " & Database
     Cn.Open
     PathGenerale = App.Path
End Sub

ed impostarmi Access:

Public AccessApp As Access.Application
Public IstanzaAccess As Boolean
Public AccessAppChiuso As Boolean

Grazie per l'aiuto

[alka]

Ho modificato il titolo della discussione per renderlo conforme al Regolamento.

Ti suggerisco di leggerlo, dato che sei nuovo, per conoscere tutte le norme da seguire per partecipare correttamente a quest'area del forum e ottenere validi suggerimenti.

Ciao e buon forum!

[cusolo]

Ci sono altre maniere per poter creare report elaborati con loghi , intestazione e piè di pagina?


Grazie

[cusolo]

Prima di tutto utlizzare il riferimento di access

poi:

[Code]
Public ObjAccess As Access.Application
Dim PercosoDb As String
PercosoDb = App.Path & "\Database\.....mdb"
Set ObjAccess = New Access.Application
ObjAccess.OpenCurrentDatabase PercosoDb
Dim Filtro As String
Filtro = " "
Filtro = "SELECT ... ObjAccess.DoCmd.OpenReport "Fattura", acViewPreview, Filtro
ObjAccess.Reports.Application.Visible = True
[\Code]