Ouverture etat access avec vb.net

Fermé

zetopskateuse - 12 juin 2012 à 18:40
zetopskateuse - 19 juin 2012 à 10:14

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 !

A voir également:

Ouverture etat access avec vb.net
Aide etat reparation electromenager - Guide
Page d'ouverture google - Guide
You don't have permission to access this resource ✓ - Forum Réseaux sociaux
Vérification d'état du pc - Guide
L'état de la memoire ne peut pas etre read - Astuces et Solutions

2 réponses

Réponse 1 / 2

zetopskateuse
14 juin 2012 à 11:54

Pas d'idée ? :'(

Réponse 2 / 2

zetopskateuse
19 juin 2012 à 10:14

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.

Discussions similaires

Trouver l'Etat/Province des départements Français ?

Exemple de base de données access

état/province ?

Adobe Reader X - documents inaccessibles

PS4 : impossible de démarrer ma console

Discussions similaires

Newsletters