Salut à tous,
est-il possible, à partir d'une base de données ACCESS, de créer une boîte de dialogue qui permette de trouver un élément de la base (parmis plusieurs champs, fonction d'un bouton radio), et après validation, de pointer dans un fichier PDF l'élément recherché?
Je m'explique: sur un bateau (par exemple), il y a plusieurs niveaux, ponts, soutes, machinerie... donc plusieurs niveaux, plusieurs locaux par niveau, il y a des regroupement de zones de feu, il y a des détecteurs... certains adressables et inhibables individuellement, d'autres faisant partie de boucles... Bref une belle base de données avec quelques milliers de lignes.
Nous avons les plans des locaux, réalisés sous visio 2003.
l'idée serait de faire une impression vers un fichier PDF (via acrobat pro), et avec un exe, proposer une interface pour l'utilisateur, qui permette par exemple de localiser facilement un détecteur (choix dans une interface, lancement du reader acrobat, en plein écran, avec zoom 200%, centré sur l'objet recherché - envoi d'une requête de recherche dans le pdf, passage de paramètres 'pleine page', zoom200% e plus peut-être)

Simple, réalisable, utopiste, durdur, arrachage de cheveux???

C'est une piste que je voudrais explorer, mais je voudrais savoir si c'est réalisable.
Merci par avance.
(je peux héberger la liste sous excel, access, et un exemple de plan sous visio ou sous acrobat en vectoriel)

Greg.

Bonjour à tous,

déjà, désolé de répondre à un post qui commence sérieusement à dater. Cependant, vu que je vois pas mal cette question revenir, je poste ici une solution utilisant l'instruction ShellExecute qui fonctionne bien pour afficher les pdfs (du moins chez moi ça fonctionne ^^).

Admettons que le nom du fichier pdf à afficher soit contenu dans une liste déroulante d'un formulaire appelée "ListeChoix", que tous les pdfs soient enregistrés dans le même dossier et que l'on veut veut afficher le bon pdf lorsque l'on clique sur un bouton "MonBouton".
La solution donnerait alors :


Private Sub MonBouton_Click()
Dim Chemin, Fichier, Absolu As String

Absolu = "D:\Documents de Zeinen\FichiersPDF\"

Fichier = Me.ListeChoix.Value

'On ne continue que si un fichier a été sélectionné.
If Fichier <> "" Then

'Association des chemins absolu et relatif pour obtenir le chemin complet vers le fichier.
Chemin = Absolu & Fichier & ".pdf"

'Execution du fichier situé à l'emplacement "Chemin" avec son programme par défaut.
ShellExecute Me.hwnd, vbNullString, Chemin, "", vbNullString, 1

Else
MsgBox "Aucun fichier sélectionné"
End If

End Sub


J'espère que ça pourra en éclairer plus d'un.
Zeinen.