Charger un fichier sur serveur

Forum destiné aux questions sur le développement : Formules, LotusScript, Java ...

Charger un fichier sur serveur

Messagepar afournery » 13 Sep 2010 à 15:30

Bonjour,

Je cherche un moyen de charger en lotus script un fichier pour le coller dans mon champ body

Code : Tout sélectionner
   REM Charger tous les fichiers restant
   pathRep = pathName + CStr(doc.Universalid)
   fileName$ = Dir$(pathRep$, 0)
      REM Injection de fichier existant
      Do While fileName$ <> ""
         strFile = StrLeft(pathRep, TOUS) + "\" + fileName
         doc.Mesfichier = strFile + ", "
         Set myFile=RtItem.EmbedObject( EMBED_ATTACHMENT, "", strFile)
         Call RtItem.Addnewline(1)
            
            fileName$ = Dir$()
      Loop


si je fais cela :
Le fichier du doc écrase le fichier sur serveur.

j'ai besoin du contraire !! Comment faire ?

Merci.
cdt,
Arnaud FOURNERY
http://afournery.free.fr
Avatar de l’utilisateur
afournery
Maître-posteur
Maître-posteur
 
Message(s) : 474
Inscrit(e) le : 24 Juin 2005 à 08:20
Localisation : Annesse et Beaulieu (24)

Messagepar roubech » 13 Sep 2010 à 20:20

bizarre, parce que EmbedObject doit bien attacher le fichier désigner dans le RTitem

Par contre, tu dis que le fichier du doc écrase le fichier sur le disque ! ? ça veut dire que le fichier est déjà présent dans ton doc ?
Avatar de l’utilisateur
roubech
Modérateur
Modérateur
 
Message(s) : 4976
Inscrit(e) le : 01 Fév 2007 à 20:22
Localisation : Lille

Messagepar Michael DELIQUE » 14 Sep 2010 à 08:13

salut

tu devrais tester s'il n'y a pas déjà un fichier du meme nom présent
Cordialement

Michael (SMS-Phobique)
----------------------------
"La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi."
Albert EINSTEIN
Avatar de l’utilisateur
Michael DELIQUE
Administrateur
Administrateur
 
Message(s) : 12183
Inscrit(e) le : 16 Déc 2004 à 10:36
Localisation : Paris/Cergy


Retour vers Développement