DetailPage-MSS-KB

Base de connaissances

Numéro d'article: 148463 - Dernière mise à jour: vendredi 19 janvier 2007 - Version: 3.3

 
Avancé : La nécessité de codage expert, l'interopérabilité et compétences multi-utilisateur.

Sommaire

Résumé

Cet article vous explique comment vous pouvez afficher des images bitmap dans un formulaire ou dans un état comportant uniquement le chemin d'accès et le nom de fichier stocké dans la table Microsoft Access.

Cet article suppose que vous êtes familiarisé avec Visual Basic pour applications et que vous êtes familiarisé avec la création d'applications Microsoft Access à l'aide des outils de programmation fournis avec Microsoft Access.

Pour plus d'informations sur Visual Basic pour applications, consultez votre version du manuel «Création d'applications avec Microsoft Access».

Remarque : Visual Basic pour applications est appelé Access Basic dans Microsoft Access version 2.0. Pour plus d'informations sur Access Basic, consultez le manuel «Création d'applications».

Plus d'informations

Parfois, il n'est pas pratique d'enregistrer des images dans une table Microsoft Access. Si vous avez un grand nombre d'images, ou si tous vos fichiers image sont volumineux, la taille du fichier de base de données Microsoft Access peut augmenter rapidement.

Les exemples suivants montrent comment afficher des images bitmap Windows sur un formulaire Microsoft Access et sur un rapport sans enregistrer les images dans une table Microsoft Access.

Dans Microsoft Access 97 et 7.0

Création de la table pour fichier de magasin et chemin d'accès des données

  1. Ouvrez la base de données Comptoir.mdb.
  2. Créer une nouvelle table est nommée Imagetable, puis ajoutez un champ texte nommé ImagePath.
  3. Ouvrez la table Imagetable en mode feuille de données, puis ajoutez le chemin d'accès et le nom d'un fichier bitmap à chaque enregistrement. Les exemples suivants illustrent la façon dont les enregistrements peuvent s'afficher :
          c:\windows\circles.bmp
          c:\windows\waves.bmp
          c:\windows\tiles.bmp
          c:\windows\bubbles.bmp
    					

Affichage des images dans un formulaire

  1. Utilisez le formulaire instantané : colonne simple Assistant pour créer un nouveau formulaire est basé sur la table ImageTable.
  2. Ouvrez le formulaire Imageform en mode Création, puis ajoutez un contrôle image au formulaire à l'aide de l'outil image dans la boîte à outils. Vous êtes invité à sélectionner une image à insérer. Sélectionnez n'importe quelle image disponible sur votre ordinateur. Nommez le contrôle ImageFrame.
  3. Définir la propriété SurActivation (OnCurrent) du formulaire Imageform à la procédure événementielle suivante :
          Private Sub Form_Current()
             On Error Resume Next
             Me![ImageFrame].Picture = Me![ImagePath]
          End Sub
    						
  4. Définir la propriété AprèsMAJ de la zone de texte ImagePath à la procédure événementielle suivante :
          Private Sub ImagePath_AfterUpdate()
             On Error Resume Next
             Me![ImageFrame].Picture = Me![ImagePath]
          End Sub
    						
  5. Ouvrez le formulaire Imageform en mode formulaire. Notez que le formulaire affiche l'image bitmap correspondante pour chaque enregistrement.

Affichage des images dans un état

  1. Vous pouvez utiliser l'Assistant État instantané pour créer un nouveau rapport est basé sur la table ImageTable. Nommez l'état ImageReport.
  2. Ouvrez ImageReport en mode Création, puis ajoutez un contrôle image pour le rapport à l'aide de l'outil image dans la boîte à outils. Vous êtes invité à sélectionner une image à insérer. Sélectionnez n'importe quelle image est disponible sur votre ordinateur. Nommez le contrôle ImageFrame.
  3. La valeur de l'événement de format de la section «Détails» du rapport sur la procédure événementielle suivante :
          
          Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
             Me![Imageframe].picture = me![Imagepath]
          End Sub 
    						
  4. Ouvrez le ImageReport en mode Aperçu avant impression. Notez que le rapport affiche l'image bitmap correspondante pour chaque enregistrement.

Dans Microsoft Access 2.0

Création de la table pour fichier de magasin et chemin d'accès des données

  1. Ouvrez la base de données exemple Comptoir.mdb.
  2. Créer une nouvelle table est nommée Imagetable, puis ajoutez un champ texte nommé ImagePath.
  3. Ouvrez la table Imagetable en mode feuille de données, puis ajoutez le chemin d'accès et le nom d'un fichier bitmap à chaque enregistrement. Les exemples suivants illustrent la façon dont les enregistrements peuvent s'afficher :
          c:\windows\circles.bmp
          c:\windows\waves.bmp
          c:\windows\tiles.bmp
          c:\windows\bubbles.bmp

Affichage des images dans un formulaire

  1. Utilisez l'Assistant formulaire instantané pour créer un nouveau formulaire est basé sur la table ImageTable. Nommez le formulaire Imageform.
  2. Ouvrez le formulaire Imageform en mode Création, puis ajoutez un cadre d'objet indépendant à l'aide de l'outil cadre d'objet indépendant dans la boîte à outils. Nommez le contrôle ImageFrame.
  3. Définir la propriété SurActivation (OnCurrent) du formulaire Imageform à la procédure événementielle suivante :
          Private Sub Form_Current()
             On Error Resume Next
             If Not IsNull(Me![ImagePath]) Then
             Me![ImageFrame].OLETypeAllowed = 1
             Me![ImageFrame].SourceDoc = Me![Imagepath]
             Me![ImageFrame].Action = 0
             End If
          End Sub
    						
  4. Définir la propriété AprèsMAJ de la zone de texte ImagePath la procédure événementielle suivante :
          Sub ImagePath_AfterUpdate ()
             On Error Resume Next
             Me![ImageFrame].OLETypeAllowed = 1
             Me![ImageFrame].SourceDoc = Me![Imagepath]
             Me![ImageFrame].Action = 0
          End Sub
    						
  5. Définissez les propriétés suivantes pour le cadre d'objet indépendant ImageFrame :
           Enabled: Yes<BR/>
           Locked: No
        
    					
  6. Ouvrez le Imageform en mode formulaire. Notez que le formulaire affiche l'image bitmap correspondante pour chaque enregistrement.
Remarque : dans Microsoft Access 97 et version 7.0, le formulaire n'affiche pas de n'importe quelle image si un chemin d'accès non valide ou un nom de fichier non valide est ajouté à la table ImageTable. Toutefois, l'interception des erreurs peut être implémentée à un degré supplémentaire pour vous assurer qu'un chemin d'accès valide et un nom de fichier valide sont entrées. Dans Microsoft Access 2.0, le formulaire ignore l'erreur, puis affiche la bitmap plus récente sur le formulaire.

Références

Pour plus d'informations sur la propriété OleTypeAllowed, recherchez l'index de l'aide de OleTypeAllowed, puis sur propriété OleTypeAllowed ou formulez votre question au Compagnon Office de Microsoft Access 97.

Pour plus d'informations sur la propriété Sourcedoc, recherchez dans le sommaire de Sourcedoc, puis sur propriété DocumentSource (SourceDoc), ou formulez votre question au Compagnon Office de Microsoft Access 97.

Les informations contenues dans cet article s'appliquent au(x) produit(s) suivant(s):
  • Microsoft Access 2.0 Standard
  • Microsoft Access 95 Standard
  • Microsoft Access 97 Standard
Mots-clés : 
kbmt kbhowto kbinterop kbprogramming KB148463 KbMtfr
Traduction automatiqueTraduction automatique
IMPORTANT : Cet article est issu du système de traduction automatique mis au point par Microsoft (http://support.microsoft.com/gp/mtdetails). Un certain nombre d’articles obtenus par traduction automatique sont en effet mis à votre disposition en complément des articles traduits en langue française par des traducteurs professionnels. Cela vous permet d’avoir accès, dans votre propre langue, à l’ensemble des articles de la base de connaissances rédigés originellement en langue anglaise. Les articles traduits automatiquement ne sont pas toujours parfaits et peuvent comporter des erreurs de vocabulaire, de syntaxe ou de grammaire (probablement semblables aux erreurs que ferait une personne étrangère s’exprimant dans votre langue !). Néanmoins, mis à part ces imperfections, ces articles devraient suffire à vous orienter et à vous aider à résoudre votre problème. Microsoft s’efforce aussi continuellement de faire évoluer son système de traduction automatique.
La version anglaise de cet article est la suivante: 148463  (http://support.microsoft.com/kb/148463/en-us/ )
L'INFORMATION CONTENUE DANS CE DOCUMENT EST FOURNIE PAR MICROSOFT SANS GARANTIE D'AUCUNE SORTE, EXPLICITE OU IMPLICITE. L'UTILISATEUR ASSUME LE RISQUE DE L'UTILISATION DU CONTENU DE CE DOCUMENT. CE DOCUMENT NE PEUT ETRE REVENDU OU CEDE EN ECHANGE D'UN QUELCONQUE PROFIT.
Article KB retiré.Exclusion de responsabilité concernant les contenus obsolètes dans la Base de connaissances
Cet article concerne des produits pour lesquels Microsoft n'offre plus de support. Il est par conséquent fourni « en l'état » et ne sera plus mis à jour.
Partager
Options de support supplémentaire
Forums du support Microsoft Community
Nous contacter directement
Trouver un partenaire Microsoft Certified Partner
Microsoft Store