Ajouter des Photos dans une zone image en VB6
Résolu
mohalesage
Messages postés
162
Statut
Membre
-
mohalesage Messages postés 162 Statut Membre -
mohalesage Messages postés 162 Statut Membre -
Salut tout le monde
Je tente d'ajouter les photos sur la feuille de saisie des données des employés
sans résultat.
j'ai utiliser :
la composante CommonDialog, que j'ai nommé Com1
un boutton command ( que j'ai nommé cmdAjout )
une zone Image ( que j'ai nommé Imag1 )
Ma première tentative était comme suit
avec cette procédure je ne n'ai pas la possibilité de choisir entre les photos
Ma Deuxième tentative, selon laquelle l'option de choisir la photo à ajouter est possible,
est comme suit
mais cette methode ne marche pas, car l'application ne reconnait pas le chemin
Je vous prie de m'indique mon erreur et de me la corriger
Merci d'avance
Je tente d'ajouter les photos sur la feuille de saisie des données des employés
sans résultat.
j'ai utiliser :
la composante CommonDialog, que j'ai nommé Com1
un boutton command ( que j'ai nommé cmdAjout )
une zone Image ( que j'ai nommé Imag1 )
Ma première tentative était comme suit
sub Private cmdAjout_Click ()
imag1.Picture= loadPicture ("C:\Documents and Settings\User\Bureau\Dossier Photos\Farid.pjg")
end sub
avec cette procédure je ne n'ai pas la possibilité de choisir entre les photos
Ma Deuxième tentative, selon laquelle l'option de choisir la photo à ajouter est possible,
est comme suit
sub Private cmdAjout_Click ()
Com1.ShowOpen
imag1.Picture= loadPicture ("C:\Documents and Settings\User\Bureau\Dossier Photos\Filename")
end sub
mais cette methode ne marche pas, car l'application ne reconnait pas le chemin
Je vous prie de m'indique mon erreur et de me la corriger
Merci d'avance
5 réponses
-
Re Salut,
A l'aide de votre proposition, ma tentative a réussi,
mais avec
Com1.ShowOpen imag1.Picture= loadPicture (Com1.FileName )
Avec toutes mes reconnaissances -
slt
y'a des année que j'ai pas fais de Vb6 :)
tu compile ton exe ou tu le lance directement de vb ?
le soucis peut venir de là, essaye en le compilant et de lancer l'exe.
Signature -
Merci pour votre attention
C'est vrai, je ne suis qu'un débutant en vb6.
avant de compiler mon application, je la lance directement pour pouvoir la testetr
seulement les tests effectué s'avérait négative -
Bonjour,
Essayez comme ceci :
Com1.ShowOpen imag1.Picture= loadPicture ("C:\Documents and Settings\User\Bureau\Dossier Photos\" & Com1.FileName )
-
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Merci pour tout le monde pour son attention
Grâce à la proposition de pijaku, en l'essayant , j'ai pu trouver la solution
image1.Picture=LoadPicture ( com1.FileName )
Toute mes reconnaissances
Le souci maintenant est comment enregistrer ce Chemin dans ma table d'Access,
sachant que le stockage des photos en access est déconseillé, voire difficile
