Discussion :

[Dullbrain]

Bonjour à tous,

J'ai un petit souci dans mon programme VB, je gère une base de données Access, dans laquelle sont définis des états Access.

En bref, l'utilisateur va dans le programme modifier des données de la base, et je souhaiterais qu'une fois ceci fait, il ait la possibilité d'imprimer l'état préexistant.

Pour l'instant, j'ai ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim b As Object
            b = CreateObject("Access.Application")
            b.visible = True
            b.OpenCurrentDatabase(getpath())
            'acViewPreview
            b.DoCmd.OpenReport("Data_M_O")

Cela me permet d'envoyer directement à l'impression, mais je souhaiterais faire un aperçu avant, voir même pouvoir régler diverses options comme celles qu'on a dans l'assistant d'impression basique de windows.

Le problème, c'est qu'en cherchant sur le net, la structure openReport peut prendre un paramètre acViewPreview pour une prévisualisation, mais quand je le tape en second paramètre de mon openReport, le compilateur hurle en me disant que c'est du non défini !

Auriez vous une solution à ce problème ?

Merci d'avance

[sinople]

Manque la ligne de code qui hurle!

[Dullbrain]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

b.DoCmd.OpenReport("Data_M_O" , acViewPreview)

Sachant que dans une macro Access, la ligne suivante donne le résultat escompté :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DoCmd.OpenReport "DATA_M_O", acViewPreview

[sinople]

Savoir que le ''code'' Access c'est VBA

et Visual Basic .Net c'est du VB.Net donc pas pareille^^

Voici un lien pour t'aider à faire ce que tu veux.

http://support.microsoft.com/kb/317113

P.S. Premier résultat google pour "vb.net DoCmd.OpenReport"

[Dullbrain]

Merci, mais en fait j'avais trouvé des codes similaires, le problème étant que le compilateur ne connaissait pas "Access.Application", donc je devais passer par un objet tout court.

Je m'en suis sorti en créant une fonction en VBA dans un module dans access, puis une macro qui exécute la fonction du module. La macro est ensuite appelée depuis le programme VB.NET et produit ce que je voulais !

Merci de ton aide !