PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEV, WEBDEV and WINDEV Mobile

|
|
|
US
Home → WEBDEV 2024 → Champ image chemin sur le serveur
Champ image chemin sur le serveur
Started by RC5M1SUR2, Jan., 20 2025 8:46 AM - 3 replies
#1
Registered member
14 messages
Posted on January, 20 2025 - 8:46 AM
Bonjour,

Un champ image (MonBandeau) fonctionne correctement en local.
Mais quand je publie, aucunes images ne s'affiche.
Le dossier est dans le dossier ext sur site.

MonBandeau = fRepWeb() + "\ext\" + "Img_EE\"

J'ai tenté également le chemin en relatif
MonBandeau = ".\SAISIE_KM_WEB\ext\Img_EE\"

Ca ne fonctionne pas

Auriez vous une idée.
Merci d'avance.
#2
Posted on January, 20 2025 - 3:45 PM
RC5M1SUR2 a écrit :
> Bonjour,

Bonjour

Je vois votre problème, vous souhaitez avoir une image dans un site internet, j'ai une solution pour vous

1. Soit vous devrez mettre à jour le programme fRepWeb() par une autre programme, lorsque le site est lancer, c'est l'url que vous devrez rajouter
Voilà un programme dont vous pourrez utiliser
// EDD (01/25) : créer un champ image et un champ bouton et champ libellé LBL_Chemin
// EDD (01/25) : copier une image dans le répertoire .../FRep_WEB/ext/Img_EE/IMG_40_Abonnee.png"
// EDD (01/25) ; mettre le code suivant dans le clic du bouton
LOCAL
cImage is ClImage_Affichage
cImage:m_sChamp_Image = "IMG_Affichage"
cImage:m_sExtension = "png"
cImage:m_sRépertoire = "http://localhost:8025/Nom_Projet_WEB/ext/Img_EE"
cImage:m_sTitre = "IMG_40_Abonnee"
cImage:Validation()
IF cImage:m_bRetour = True THEN
LBL_Chemin = cImage:m_sRépertoire + "\" + cImage:m_sTitre + "." + cImage:m_sExtension
IMG_Affichage..Valeur = cImage:m_sRépertoire + "\" + cImage:m_sTitre + "." + cImage:m_sExtension
END

// EDD (01/25) : créer une nouvelle classe ClImage_Affichage
ClImage_Affichage est une Classe
m_bRetour is booléen
m_sRépertoire is string
m_sTitre is string
m_sExtension is string
m_sChamp_Image is string
FIN

// EDD (01/25) : créer une nouvelle méthode dans la classe ClImage_Affichage
PROCÉDURE Validation()
LOCAL
:m_bRetour = True
IF NoSpace(:m_sRépertoire) = "" THEN
:m_bRetour = False
Info("Merci de remplir le répertoire d'image.")
ELSE IF NoSpace(:m_sTitre) = "" THEN
:m_bRetour = False
Info("Merci de remplir le titre d'image.")
ELSE IF NoSpace(:m_sChamp_Image) = "" THEN
:m_bRetour = False
Info("Merci de remplir le champ d'image.")
ELSE IF ChampExiste(:m_sChamp_Image) = False THEN
:m_bRetour = False
Info("Merci de vérifier le champ d'image car il est introuvable.")
END

NB : Attention sur l'url de l'image, il faudrait que le texte de l'url est le nom du serveur serveur mais fRepWeb() attention

Cordialement
Mr.RATSIMANDRESY
Niry Aina Eddy
#3
Posted on January, 20 2025 - 4:33 PM
RC5M1SUR2 a écrit :
Bonjour,

Un champ image (MonBandeau) fonctionne correctement en local.
Mais quand je publie, aucunes images ne s'affiche.
Le dossier est dans le dossier ext sur site.

MonBandeau = fRepWeb() + "\ext\" + "Img_EE\"

J'ai tenté également le chemin en relatif
MonBandeau = ".\SAISIE_KM_WEB\ext\Img_EE\"

Ca ne fonctionne pas

Auriez vous une idée.
Merci d'avance.


Bonjour,

Quand vous avez votre bandeau qui affiche une image en erreur, clic droit > ouvrir image dans le navigateur et regarder l'url qui a été généré, puis corriger votre code en conséquences.

MonBandeau = "ext/Img_EE/" < je pense que cette syntaxe devrait jouer ^^
#4
Posted on January, 20 2025 - 4:33 PM
RC5M1SUR2 a écrit :
Bonjour,

Un champ image (MonBandeau) fonctionne correctement en local.
Mais quand je publie, aucunes images ne s'affiche.
Le dossier est dans le dossier ext sur site.

MonBandeau = fRepWeb() + "\ext\" + "Img_EE\"

J'ai tenté également le chemin en relatif
MonBandeau = ".\SAISIE_KM_WEB\ext\Img_EE\"

Ca ne fonctionne pas

Auriez vous une idée.
Merci d'avance.


Bonjour,

Quand vous avez votre bandeau qui affiche une image en erreur, clic droit > ouvrir image dans le navigateur et regarder l'url qui a été généré, puis corriger votre code en conséquences.

MonBandeau = "ext/Img_EE/" < je pense que cette syntaxe devrait jouer ^^
→ Go back to WEBDEV 2024