afficher un état access avec vb.net

Re Bonjour,

Je cherche à afficher un état access qui existe dans ma base. J'ai trouvé ce code sur le forum mais je n'ai pas d'affichage:
Code:

1 2 3 4 5 Dim MaDbMat As String = "c:\Helpdesk.mdb" Dim MesEtats As Object MesEtats = CreateObject("Access.Application") MesEtats.OpenCurrentDatabase(MaDbMat, False) MesEtats.DoCmd.OpenReport("E_fiche_intervention", 2)
si quelqu'un sait comment faire...

Merci

bonjour,

As tu trouvé comment faire cela m'interesse aussi?
Merci

Sur MSDN

Code:

1
2
3
4
5
6
7
8
9
10
11
Dim oAccess As Access.Application
' Démarre une nouvelle instance d'Access pour l'automatisation :
oAccess = New Access.ApplicationClass()
' Ouvre une base de données en mode exclusif :
oAccess.OpenCurrentDatabase(filepath:="c:\mydb.mdb", Exclusive:=True)
' Affiche l'aperçu de l'état nommé Sales :
oAccess.DoCmd.OpenReport(ReportName:="Sales", _
   View:=Access.AcView.acViewPreview)
' Imprime l'état nommé Sales :
oAccess.DoCmd.OpenReport(ReportName:="Sales", _
   View:=Access.AcView.acViewNormal)

Explication Ici

Merci de ta reponse.

Pour info j'avais placé ce code qui fonctionne mais m'ouvre également access en container, et ca fait pas trop joli :(
J'aurais aimé n'ouvrir que l'état ou ouvrir l'etat dans un form, est ce possible?
Code:

1 2 3 4 5 6 7 8 Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim MaDbMat As String = "c:\Gillou\essai.mdb" Dim MesEtats As Object MesEtats = CreateObject("Access.Application") MesEtats.OpenCurrentDatabase(MaDbMat, False) MesEtats.DoCmd.OpenReport("TFactures", 2) MesEtats.visible = True End Sub
merci en tout cas de m'avoir repondu