PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV (précédentes versions) → amélioration pour insertion d'image
amélioration pour insertion d'image
Débuté par MEITE, 06 juil. 2024 12:02 - 1 réponse
Posté le 06 juillet 2024 - 12:02
i est entier
Myfilename est une chaîne
HLitPremier(GBEKE_AGT_CE$)
TANTQUE PAS HEnDehors(GBEKE_AGT_CE$)
SI GBEKE_AGT_CE$.PHOTO_NOM <> "" ALORS
i++
Myfilename = GBEKE_AGT_CE$.PHOTO_NOM
HAttacheMémo(GBEKE_AGT_CE$,PHOTO_IMG,"C:\sauvegarde\"+Myfilename,hMemoImg)
HOuvre(GBEKE_AGT_CE$)
HModifie(GBEKE_AGT_CE$)
ToastAffiche("enregistrement terminé pour "+Myfilename)
//ToastAffiche(i)
HLitSuivant(GBEKE_AGT_CE$)
FIN
FIN
Info("insertion terminée")


Salut à tous!
j'utilise le code joint pour insérer des photos d'identité présentent dans un répertoire pour les insérer dans une base. Le code marche mais lorsque qu'un individu n'a pas sa photo dans le repertoire indiqué le programme bloque.
J'aimerai trouver le moyen de sauter quand la photo est absente.
Merci pour votre
Membre enregistré
4 061 messages
Popularité : +227 (347 votes)
Posté le 08 juillet 2024 - 11:20
Bonjour,
Il suffit de n'effectuer le traitement qu'en cas d'existence du fichier (fFichierExiste.)
RQ 1 Le HOuvre est inutile, il est implicite lors de l'utilisation d'une fonction HXXX cf doc.
RQ 2 Que vient faire le i++
RQ 3 As tu pensé à travailler avec une requête (exécutée avec l'option hmodifiefichier) qui ne prendrait en compte que les colonnes PHOTO_NOM non vides ? Cela limiterait le nombre de tuples à traiter.

--
Il y a peut être plus simple, mais, ça tourne
Message modifié, 08 juillet 2024 - 11:52