| Posté le 15 juillet 2025 - 16:26 |
Bonjour à toutes et tous,
Je développe actuellement un site type annuaire, avec Webdev 24, qui nécessite l'upload d'une photo par l'utilisateur.
Après bien des péripéties j'ai réussi à faire fonctionner le champ upload en mode test avec ce code :
POUR i = 1 _À_ UPL_Upload1..Occurrence
//Dossier temporaire
sDossierTemp est une chaîne = fRepDonnées() + "\Temp"
SI fRépertoireExiste(sDossierTemp) = Faux ALORS
fRepCrée(sDossierTemp)
FIN
//Récupère le nom de fichier
sNomFichier est une chaîne = UploadNomFichier(UPL_Upload1, Faux,i)
// Génère un nom de fichier unique : YYYYMMDD_HHMMSS_nomoriginal.ext
sHorodatage est une chaîne = DateVersChaîne(DateSys(), "YYYYMMDD") + "_" + HeureVersChaîne(HeureSys(), "HHMMSS")
sNomTemp est une chaîne = sHorodatage + "_" + sNomFichier
sNomFichierFinal est une chaîne = sDossierTemp + "\" + sNomTemp
UploadCopieFichier(UPL_Upload1,sDossierTemp,sNomTemp,i)
FIN
Ce n'est peut-être pas le plus adapté mais ça fonctionne. Je copie ensuite l'image dans un mémo que je stock dans ma base sans soucis.
En production sur le serveur IIS j'ai cependant deux problèmes que je n'arrive pas à résoudre. C'est pour ça que je fais appel à vous.
1 - Les images doivent être en basse résolution, au dessus d'une taille encore à définir le fichier n'est pas copié sur le serveur.
2 - Il est impossible de faire un upload en utilisant Firefox alors que je n'ai pas ce problème avec Edge ou Chrome.
Je prend toutes les idées pour résoudre l'un ou l'autre de ces problèmes.
Merci d'avance pour votre aide.
Cordialement.
Maxime |
| |
| |
|