Page 1 sur 1

Charger un fichier sur serveur

MessagePublié: 13 Sep 2010 à 15:30
par afournery
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.

MessagePublié: 13 Sep 2010 à 20:20
par roubech
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 ?

MessagePublié: 14 Sep 2010 à 08:13
par Michael DELIQUE
salut

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