PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WEBDEV 2024 → UpLoad de fichier
UpLoad de fichier
Iniciado por jpmottoul, fev., 23 2004 12:17 PM - 2 respostas
Publicado em fevereiro, 23 2004 - 12:17 PM
Je veux UpLoader des fichiers.
J'ai donc une page avec un champ Upload.
Cela fonctionne dans le sens ou le fichier est bien copié sur le serveur.
Comme ces fichiers doivent étre ensuite ouvert (pas LanceAppliAssocié par
exemple) Je veux enregistrer dans un fichier HF le Chemin.

Mon probléme c'est qu'il enregistre toujours le chemin temporaires créé.
Voici mon code :

----------------------------------------------------------------------------
------
ficSource, ficDest sont des chaînes
// CheminIPPT est le nom du champ contenant le nom complet du fichier à
uploader
// Recherche du nom du fichier uploadé sur le serveur
ficSource = UploadNomFichier("CheminIPPT")
// si ficSource existe, on le copie dans le répertoire des documents sur le
serveur
SI ficSource <> "" ALORS

//UploadCopieFichier("CheminIPPT","\\eurodata\data\Public_folder\WindevDataB
ases\INES\UPLoad","") // Chemin ou le fichier est copié sur le serveur
// Recherche du nom du fichier uploadé sur le client
ficDest = UploadNomFichier("CheminIPPT", Faux)
ficDest = "\\eurodata\data\Public_folder\WindevDataBases\INES\UPLoad\"
+fExtraitChemin(ficDest,fFichier+fExtension)
// copie du fichier
fCopieFichier(ficSource,ficDest)

FIN
ficDest = fExtraitChemin(ficDest,fFichier+fExtension)
Info(ficDest)
CPPT.CheminIPPT = ficDest
PageVersFichier(CPPTadd,CPPT)
HAjoute(CPPT)
Info("Le rapport à bien été ajouté !")
PageAffiche(CPPTView)
----------------------------------------------------------------------------
--------

Il enregistre comme chemin : c:\My Documents\jpmottoul\compte rendu PPT
031103.doc;C:\WINNT\TEMP\WEBDEV_0_3884.upl


Et je voudrais avoir :
\\eurodata\data\Public_folder\WindevDataBases\INES\UPLoad\compte rendu
PPT031103.doc


qq'un peut'il m'aider ? Merci
Publicado em fevereiro, 23 2004 - 3:23 PM
Salut

Inverse ce code :
CPPT.CheminIPPT = ficDest
PageVersFichier(CPPTadd,CPPT)
HAjoute(CPPT)


et fais :
PageVersFichier(CPPTadd,CPPT)
CPPT.CheminIPPT = ficDest
HAjoute(CPPT)

Ca marche peut être mieux

@+
Max°(51)°

"JP Mottoul" <jpmottoul@euroscreen.be> a écrit dans le message de
news:4039d4aa@news.pcsoft.fr...

Je veux UpLoader des fichiers.
J'ai donc une page avec un champ Upload.
Cela fonctionne dans le sens ou le fichier est bien copié sur le serveur.
Comme ces fichiers doivent étre ensuite ouvert (pas LanceAppliAssocié par
exemple) Je veux enregistrer dans un fichier HF le Chemin.

Mon probléme c'est qu'il enregistre toujours le chemin temporaires créé.
Voici mon code :

--------------------------------------------------------------------------

--
------
ficSource, ficDest sont des chaînes
// CheminIPPT est le nom du champ contenant le nom complet du fichier à
uploader
// Recherche du nom du fichier uploadé sur le serveur
ficSource = UploadNomFichier("CheminIPPT")
// si ficSource existe, on le copie dans le répertoire des documents sur

le
serveur
SI ficSource <> "" ALORS


//UploadCopieFichier("CheminIPPT","\\eurodata\data\Public_folder\WindevDataB
ases\INES\UPLoad","") // Chemin ou le fichier est copié sur le serveur
// Recherche du nom du fichier uploadé sur le client
ficDest = UploadNomFichier("CheminIPPT", Faux)
ficDest = "\\eurodata\data\Public_folder\WindevDataBases\INES\UPLoad\"
+fExtraitChemin(ficDest,fFichier+fExtension)
// copie du fichier
fCopieFichier(ficSource,ficDest)

FIN
ficDest = fExtraitChemin(ficDest,fFichier+fExtension)
Info(ficDest)
CPPT.CheminIPPT = ficDest
PageVersFichier(CPPTadd,CPPT)
HAjoute(CPPT)
Info("Le rapport à bien été ajouté !")
PageAffiche(CPPTView)
--------------------------------------------------------------------------

--
--------

Il enregistre comme chemin : c:\My Documents\jpmottoul\compte rendu PPT
031103.doc;C:\WINNT\TEMP\WEBDEV_0_3884.upl


Et je voudrais avoir :
\\eurodata\data\Public_folder\WindevDataBases\INES\UPLoad\compte rendu
PPT031103.doc


qq'un peut'il m'aider ? Merci


Publicado em fevereiro, 23 2004 - 4:45 PM
cool... ca marche...

Merci

JP

"Max" <max51@hotmail.com> a écrit dans le message de
news:403a01e6@news.pcsoft.fr...

Salut

Inverse ce code :
CPPT.CheminIPPT = ficDest
PageVersFichier(CPPTadd,CPPT)
HAjoute(CPPT)

et fais :
PageVersFichier(CPPTadd,CPPT)
CPPT.CheminIPPT = ficDest
HAjoute(CPPT)

Ca marche peut être mieux

@+
Max°(51)°

"JP Mottoul" <jpmottoul@euroscreen.be> a écrit dans le message de
news:4039d4aa@news.pcsoft.fr...

Je veux UpLoader des fichiers.
J'ai donc une page avec un champ Upload.
Cela fonctionne dans le sens ou le fichier est bien copié sur le

serveur.
> > Comme ces fichiers doivent étre ensuite ouvert (pas LanceAppliAssocié
par
exemple) Je veux enregistrer dans un fichier HF le Chemin.

Mon probléme c'est qu'il enregistre toujours le chemin temporaires créé.
Voici mon code :


--------------------------------------------------------------------------
--
------
ficSource, ficDest sont des chaînes
// CheminIPPT est le nom du champ contenant le nom complet du fichier à
uploader
// Recherche du nom du fichier uploadé sur le serveur
ficSource = UploadNomFichier("CheminIPPT")
// si ficSource existe, on le copie dans le répertoire des documents sur
le

serveur
SI ficSource <> "" ALORS



//UploadCopieFichier("CheminIPPT","\\eurodata\data\Public_folder\WindevDataB
ases\INES\UPLoad","") // Chemin ou le fichier est copié sur le serveur
// Recherche du nom du fichier uploadé sur le client
ficDest = UploadNomFichier("CheminIPPT", Faux)
ficDest = "\\eurodata\data\Public_folder\WindevDataBases\INES\UPLoad\"
+fExtraitChemin(ficDest,fFichier+fExtension)
// copie du fichier
fCopieFichier(ficSource,ficDest)

FIN
ficDest = fExtraitChemin(ficDest,fFichier+fExtension)
Info(ficDest)
CPPT.CheminIPPT = ficDest
PageVersFichier(CPPTadd,CPPT)
HAjoute(CPPT)
Info("Le rapport à bien été ajouté !")
PageAffiche(CPPTView)

--------------------------------------------------------------------------
--
--------

Il enregistre comme chemin : c:\My Documents\jpmottoul\compte rendu PPT
031103.doc;C:\WINNT\TEMP\WEBDEV_0_3884.upl


Et je voudrais avoir :
\\eurodata\data\Public_folder\WindevDataBases\INES\UPLoad\compte rendu
PPT031103.doc


qq'un peut'il m'aider ? Merci