domenica 14 dicembre 2008

Aprire un report di Microsoft Access in Visual Basic Net


In questo esempoi di codice, vediamo come utilizzare Microsoft Access per aprire un report, tramite il linguaggio di programmazione Visual Basic Net

Naturalmente il report in questione dovrà essere stato creato in precedenza.

Impostazioni

Si crea un nuovo progetto vb.net, aggiungiamo alla form due pulsanti, uno per la chiusura del programma e l’altro per la visualizzazione del report.

A questo punto, per utilizzare Microsoft Access, bisogna aggiungere un riferimento per il programma access, per far ciò, dobbiamo aggiungere il riferimento access, tramite la voce aggiungi riferimento, situata nella voce di menu progetto. Selezioniamo la pagina Com, e cerchiamo la voce Microsoft Access 10.0 object library, dove 10 sta ad indicare la versione di access.Individuata tale voce, la selezioniamo con il puntatore del mouse e facciamo click sul pulsante seleziona e poi ok.

Stesura del codice.



Dopo aver terminato le varie operazioni di impostazione, scriviamo il codice per aprire un report.



Andiamo nell’evento click del pulsante apri report e scriviamo il seguente listato di codice.





Private Sub btnapri_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnapri.Click



Dim objaccess As Access.Application



'instanzio l'oggetto access



objaccess = New Access.ApplicationClass



Dim StrPercorsoDb As String



'indico il percorso (cartella documenti) compresa del file



StrPercorsoDb = Environment.GetFolderPath(Environment.SpecialFolder.Personal) & "\report.mdb"



'apro il database



objaccess.OpenCurrentDatabase(StrPercorsoDb, exclusive:=False)



'tramite il metodo oper report apro il report passandogli come argomenti nome report e tipo di apertura



objaccess.DoCmd.OpenReport(reportname:="anagrafica", View:=Access.AcView.acViewPreview, FilterName:="") ', WindowsMode:=Access.AcWindowMode.acWindowNormal)



'lo visualizzo



objaccess.Visible = True





End Sub





Dal listato si noti che è stato creato un oggetto di tipo access.



tramite il metodo opencurrentdatabase apro il database, e il metodo openreport della proprietà docmd apro il report in modalità anteprima di stampa.



In effetti tale metodo accetta vari argomenti, quali, nome report, tipo di apertura, filtro, condizione e tipo di visualizzazione.



la proprietà visible rende visibile tale report.



Conclusioni



Questo esempio di codice ha illustrato i passi per visualizzare un report da Visual Basic .Net, ma tale codice si può applicare anche all’interno del programma access tramite il linguaggio VBA.


Tramite la parola download potete scaricare i file d'esempio

Download esempio

Nessun commento: