ouverture etat access avec vb.net Fermé

Question

Bonjour, 
.
Je me permets d'ouvrir ce sujet car après recherche je n'ai pas trouvé la réponse sur le forum.
Je cherche à ouvrir un etat access en vb.net mais j'obtiens l'erreur "impossible d'exécuter cette action pour l'instant".
(Il me faut absolument ouvrir cet état et non créer un rapport avec crystal report ou autre comme suggéré sur d'autres forums.)
.
Voici mon code :
.

Dim OAccess As Object
OAccess = CreateObject("Access.Application")
OAccess.DoCmd.OpenReport("liste_clients", Access.AcView.acViewPreview)
OAccess.Visible = True
OAccess = Nothing

L'erreur se produit sur sur OpenReport. (Je précise que la base de données est ouverte dès le lancement du programme.)
Je suppose qu'après OpenReport il faudrait un Close quelque part mais je ne sais pas où le mettre et le problème ne semble pas venir de là.
.
C'est la première fois que j'essaie de faire ça donc je ne suis pas très à l'aise avec ce code. Si vos réponses pouvaient être assez précises ce serait vraiment génial :)
.
Merci beaucoup !


Configuration: Windows 7 / Firefox 12.0

zetopskateuse · Answer

Pas d'idée ? :'(

zetopskateuse · Answer

Bonjour,

Je ne m'en sors vraiment pas. Je vous remets mon code, je n'avance pas d'un pouce.


If connect() Then '(connection OK)
            Try
                Dim OAccess As Object
                OAccess = CreateObject("Access.Application")
                OAccess.DoCmd.OpenReport(nomEtat, AcView.acViewPreview)
                OAccess.Visible = True
                OAccess = Nothing
            Catch ex As Exception
                MessageBox.Show(ex.Message)
            Finally
                deconnect()
            End Try
        End If


J'ai aussi essayé une fonction trouvée sur le net :


deconnect() '(si déjà connecté : deconnection)

OpenCurrentDatabase("mydb.mdb")
With objAccess
                DoCmd.OpenReport("liste_clients", Access.AcView.acViewNormal)
End With

Cela renvoit le code d'erreur 7866 (db ouverte en mode exclusif)
pourtant voici ma chaine de connection :
Provider=Microsoft.Jet.OLEDB.4.0;Data source=mydb.mdb;Mode=Share Deny None;

Toute idée est la bienvenue.
Merci beaucoup.

Ouverture etat access avec vb.net

2 réponses

Discussions similaires