// Sélectionne un nouveau fichier à ouvrir
sNomFichier est une chaîne = Ouvre(FEN_DBOX_FSELECTEUR,gclSession,"",Vrai,"Fichiers Word (*.docx)"+TAB+"docx"+RC+"Tous les fichiers"+TAB+"")
sNomFichierlocal = "C:\temp\" + ExtraitChaîne(sNomFichier,1,"/",DepuisFin)
SI sNomFichier<>"" ALORS
ToastAffiche("Ouverture du document",toastLong,cvMilieu,chCentre)
Sablier()
bufContenu est un Buffer = DBoxTélécharge(gclSession,sNomFichier)
SI PAS ErreurDétectée ALORS
// Methode 1
// fSauveBuffer(sNomFichierlocal, bufContenu)
// TT_SansNom1 = DocOuvre(sNomFichierlocal)
// Méthode 2 les deux marche
TT_SansNom1 = bufContenu

gsFichierEdité = sNomFichier
ChangeEtatModifié(Faux)
FIN
Sablier(Faux)
FIN

DocSauve(TT_SansNom1,sNomFichierlocal)
SI ErreurDétectée ALORS
Erreur(ChaîneConstruit("Le fichier %1 n'a pas pu être enregistré.", gsFichierEdité), ErreurInfo())
FIN

DocFerme(TT_SansNom1)
// Pour libéré le fichier j'enregistre sous un fichier temp
sNomFichierlocal = "C:\temp\~$" + ExtraitChaîne(gsFichierEdité,1,"/",DepuisFin)
DocSauve(TT_SansNom1,sNomFichierlocal)

SI ErreurDétectée ALORS
Erreur(ChaîneConstruit("Le fichier %1 n'a pas pu être enregistré.", gsFichierEdité), ErreurInfo())
FIN

//bufContenu est un buffer = TT_SansNom1
CheminLocal est une chaîne = "C:\temp\" + ExtraitChaîne(gsFichierEdité,1,"/",DepuisFin)
// fSauveBuffer(sNomFichierlocal, MonBuffer) marche pas sur un document
// donc ne peut pas utilisé DBoxEnvoieBuffer(.........

sNomFichierlocal = "C:\temp\" + ExtraitChaîne(gsFichierEdité,1,"/",DepuisFin)
DBoxEnvoieFichier(gclSession,CheminLocal,gsFichierEdité,stOption)
SI ErreurDétectée ALORS
Erreur(ChaîneConstruit("Le fichier %1 n'a pas pu être enregistré.", sNomFichierlocal), ErreurInfo())
FIN