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
A voir également:
- Ajouter des Photos dans une zone image en VB6
- Partager des photos - Guide
- Alternative zone telechargement - Accueil - Outils
- Vb6 - Télécharger - Divers Utilitaires
- Toutes mes photos - Guide
- Google photos - Télécharger - Albums photo
5 réponses
Re Salut,
A l'aide de votre proposition, ma tentative a réussi,
mais avec
Avec toutes mes reconnaissances
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
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
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 :
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
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
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