Ouverture etat access avec vb.net
zetopskateuse
-
zetopskateuse -
zetopskateuse -
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 :
.
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 !
.
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 !
A voir également:
- Ouverture etat access avec vb.net
- Remettre pc etat usine - Guide
- Page d'ouverture google - Guide
- Etat disque dur - Télécharger - Informations & Diagnostic
- Acer quick access - Forum Logiciels
- Access runtime ✓ - Forum Access
2 réponses
Bonjour,
Je ne m'en sors vraiment pas. Je vous remets mon code, je n'avance pas d'un pouce.
J'ai aussi essayé une fonction trouvée sur le net :
Cela renvoit le code d'erreur 7866 (db ouverte en mode exclusif)
pourtant voici ma chaine de connection :
Toute idée est la bienvenue.
Merci beaucoup.
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.
