Affichager d'image à partir de son chemin d'accès

Question

Bonjour,
J'ai une base access contenant deux champs :
nom : nom du fichier, sans l'extension (c tjs du .jpg)
adresse : adresse relative du dossier contenant l'image

Et g voudrais afficher l'image dans VB

Merci !

Renfield · Answer

on va s'occuper de la partie affichage , partant du principe que tu sais recuperer les infos de ta base..........

dans un noveau projet , ajoutes une picturebox, un bouton , et fait ceci :


private sub Command1_Click()
    set picture1.Picture = LoadPicture ( CheminFichier & NomFichier & ".jpg" )
end sub


-----------------------------------------------------------------------
By Renfield

thomas_reynald@msn.com

Aucune touche n'a été bléssée lors de la saisie de ce texte..........

sschupp · Answer

Heu, cheminFichier et NomFichier, se sont des variables que j'ai liées à la base ou directement les champs de la base ?
Merci.

Renfield · Answer

ce sont les champs, a toi de t'amuser a les recuperer depuis ta base de données.....
-----------------------------------------------------------------------
By Renfield

thomas_reynald@msn.com

Aucune touche n'a été bléssée lors de la saisie de ce texte..........

sschupp · Answer

Merci Renfield ! Ca marche !
Bon, pour ceux qui veulent tout le code, voili :

Private Sub Form_Load()
    Dim var_nom, var_adr As String
    Dim relatif, vignettes, extension As String
    With adobd_saisie_liste.Recordset
        var_nom = .Fields("nom")
        var_adr = .Fields("adresse")
    End With
    relatif = ".."
    vignettes = "vignettes"
    extension = ".jpg"
    Set apercu.Picture = LoadPicture(relatif & var_adr & vignettes & var_nom & extension)
End Sub

Ca permet d'afficher l'image sur le formulaire de départ. G pas encore testé en mode ajout.

Affichager d'image à partir de son chemin d'accès

4 réponses

Discussions similaires