Bonjour à tous
je voudrais uploader une image dans un champ image avant de l'enregistrer dans un dossier que j'ai créé à cet effet.
Après 2 semaines de recherches, je n'y arrive toujours pas, mais j'ai trouvé une astuce que voici :
- j'ai créé un champ Image nommé (IMG_Photo) , un bouton serveur masqué (BTN_Photo) et un champ upload(UPL_Upload)
Code : A chaque modification de UPL_Upload
Code : Traitement Clic sur BTN_Photo
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 SAI_Chemin = "" SAI_Chemin = MoiMême ExécuteTraitement(BTN_Photo,trtClic)
Question 1
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 FichierSource, FichierDest sont des chaînes // SAI_Fichier est le nom du champ de saisie contenant le nom complet du fichier à uploader // Recherche du nom du fichier uploadé sur le serveur FichierSource = fExtraitChemin(SAI_Chemin,fDisque+fRépertoire+fFichier+fExtension) // Si FichierSource existe, on le copie dans le répertoire des documents sur le serveur SI FichierSource <> "" ALORS SI fFichierExiste(FichierSource) = Vrai ALORS // Créer la destination du fichier FichierDest = sRépertoireDestination + "\" + SAI_Chemin // Copie du fichier SI fCopieFichier(FichierSource, FichierDest) = Vrai ALORS LIB_info = "Fichier copié avec succès" SINON Erreur(ErreurInfo(errComplet)) FIN SINON Erreur("Veuillez sélectionner une Image") FIN FIN
Y a t-il autre moyen que je ne connais pas de charger le champ IMG_Photo et l'enregistrer ?
si oui votre aide me sera d'une très grande utilité
Question 2
dans mon code ci dessus, la variable FichierDest renvoie vide c'est-à-dire FichierDest = ""
comment donc récupérer le chemin complet du fichier uploadé à parti du BTN_Photo ou UPL_Upload ?
Merci infiniment, j'y travail en vain depuis 2 semaines
Partager