PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WEBDEV 2024 → HAttacheMémo bien en local. Plus en ligne :-(
HAttacheMémo bien en local. Plus en ligne :-(
Iniciado por thomas_ramage, 01,abr. 2005 19:28 - 3 respuestas
Publicado el 01,abril 2005 - 19:28
Bonjour,

Sur une page j'ai un champ de saisie de type upload avec lequel je recherche une image. Pour l'enregistrer dans la BDD j'ai un champ mémo image et je fais:
HAttacheMémo(NomFic,NomRubrMemo,UploadNomFichier(ChpSsiImg,Faux))
HAjoute(NomFic)
En local ça fonctionne mais pas en ligne.
En cherchant dans le forum j'ai vu que JP mottoul a eu le même problème mais il n'ya pas de solution proposée : http://forum.pcsoft.fr/post.awp…
Tu as surement trouvé la solution depuis, non?! Les réponses des autres développeurs sont bien sur les bienvenues.
merci
thomas
Publicado el 04,abril 2005 - 14:28
Bonjour,

Je suis resté longtemps sur ce probleme et suis passé par une recopie sur le serveur, ça semble fonctionner :

j'ai un champ invisible "SaisieNomImg "pour donner un nom bidon, qui je détruit ensuite

SI ChampSaisieUpload <> "" ALORS
SaisieNomImg = "toto.jpg"
UploadCopieFichier(ChampSaisieUpload,fRepWeb(),SaisieNomImg)
HAttacheMémo(FichierHF,RubriqueFichier,fRepWeb+"/"+SaisieNomImg,hMémoImg)
FIN

hajoute(FichierHF)

fSupprime(fRepWeb()+"/"+SaisieNomImg)


Ca vaut ce que ça vaut. D'ailleurs, je ne pense pas que le champ invisible soit necessaire, mais j'ai la flemme de reprendre mes codes.

Fred
Publicado el 04,abril 2005 - 17:09
En effet avec ta technique en passant par le serveur ça fonctionne parfaitement, merci pour l'astuce. Et non il n'ya pas besoin du champ invisible SaisieNomImg, le nom en dur passe très bien.
Publicado el 19,abril 2005 - 13:02
Bonjour,
Le mieux est, je pense, de le sauver sur le serveur d'abord, puis de le récupérer pour l'injecter dans ta table :

gPathImages est une chaîne = ComplèteRep(fRepWeb)+"UsersImages\"
ficRef,ficSource est une chaîne

ficSource = UploadNomFichier("champupload")
ficRef = UploadNomFichier("champupload",Faux)

// si ficSource existe, on le copie sur le serveur
SI ficSource <> "" ALORS
// envoi du fichier client sur le serveur
ficDest = UploadCopieFichier("champupload",gPathImages,"Temp.jpg" )
// Attacher l'image à l'enregistrement
HAttacheMémo(NomFic,NomRubrMemo,gPathImages+"Temp.jpg",hMémoImg)
HAjoute(NomFic)
END