WR SAUVER DOCUMENT

4D - Documentation   Français   English   German   4D Write, Commandes par thèmes   4D Write, Liste alphabétique des commandes   4D Write, Constantes par thèmes   Retour   Précédent   Suivant

version 2004.5 (Modifiée)


WR SAUVER DOCUMENT (zone; document{; type})

ParamètreTypeDescription
zoneEntier longZone 4D Write
documentAlphaChemin d'accès du document à sauver sur disque
Chemin d'accès du document sauvé sur disque
typeAlphaType de document à sauver (4 caractères)
Type de document sauvé (4 caractères)

Description

La commande WR SAUVER DOCUMENT permet d'enregistrer le texte se trouvant dans zone sous forme d'un document sur disque.

Vous devez passer dans document le nom ou le chemin d'accès complet du document, c'est-à-dire l'enchaînement des répertoires permettant d'accéder au document :

sous Windows ou dans le cas d'une gestion multi-plate-forme, passez la lettre du disque et le symbole "\" entre chaque répertoire. Le nom du fichier comprend une extension déterminant son type (par exemple : "D:\Répertoire\Fichier.4W7").

sous Mac OS, passez le nom du disque et le symbole ":" entre chaque dossier (par exemple : "Disque:Répertoire:Document").

Si vous passez uniquement un nom de document, WR SAUVER DOCUMENT sauvegardera le document dans le répertoire contenant la structure de la base.

Si document est une chaîne vide, WR SAUVER DOCUMENT présentera la boîte de dialogue standard d'enregistrement de fichiers. Par défaut, le type du document est 4D Write.

Si l'utilisateur clique sur OK (Windows) ou Enregistrer (Mac OS), la variable système "OK" de 4D vaudra 1, la variable document contiendra le fichier choisi par l'utilisateur et la variable type contiendra son type.

Si l'utilisateur annule le dialogue, la variable système "OK" de 4D vaudra 0.

Sous Windows, le menu Type vous propose les formats listés ci-après.

Sous Mac OS, vous disposez d'un pop up menu contenant les formats listés ci-après.

Par défaut, le document est enregistré au format 4D Write. Si vous voulez spécifier un type différent, vous devez passer dans type le type du fichier (chaîne de 4 caractères).

Voici la liste des types optionnels possibles :

TypeFichierExtension Windows
4WR74D Write.4W7
4WT7Modèles 4D Write.4WT
RTF (*)RTF.RTF
ASCWTexte au format Windows.TXT
ASCMTexte au format Mac OS.TXT
ASCUTexte au format Unicode.TXT
HTMLFormat HTML 4.0.HTML
HTM3 (**)Format HTML 3.2.HTML
DOC8Format Word97 Win/Word98 Mac.DOC

(*) Ajoutez un espace derrière "RTF " afin d'obtenir les 4 caractères nécessaires.

(**) Vous devez utiliser l'export HTML 3.2 si vous souhaitez pouvoir réinterpréter le document dans 4D Write (seul le HTML 3 est pris en charge lors de l'import dans 4D Write).

Le paramètre type ne représente pas le type de fichier Macintosh, ni l'extension Windows. Il définit l'encodage du document.

Toutefois, il permet à 4D Write de déterminer la valeur appropriée pour, sous Windows, l'extension de fichier, et sous Mac OS, le couple créateur/type du fichier :

Sous Windows

Format 4D WriteExtension
4D Write.4W7
RTF.RTF
HTML.HTML
ASCII PC/Mac.TXT
ASCII unicode.TXT
Word.DOC

L'extension du fichier est définie d'après le paramètre type, même si le nom comporte déjà une extension. Par exemple, si "Rapport.RTF" est passé dans le paramètre document et "HTML" dans type, le fichier sera nommé "Rapport.HTML".

Sous Mac OS

Format 4D WriteCréateurType
4D Write4DW74WR7
RTF4DW7RTF
HTMLMOSSTEXT
ASCII PC/Mac4DW7TEXT
ASCII unicode4DW7TEXT
WordMSWDW8BN

Note : L'exportation au format Word ne prend pas en charge les images (tous types), les puces et les liens hypertexte.

Exemples

(1) Vous voulez sauvegarder le document 'LettreClient' au format 4D Write dans le dossier "DocumentsWrite" placé à côté de la structure de la base :

      `Récupération du chemin d'accès à la structure
   $Doc:=Fichier structure
   Doc:=$Doc
   $long:=0
      `Récupération de la position du dernier séparateur pour enlever le nom de la structure au chemin d'accès
   Tant que((Position(":";$Doc)#0)
      $Doc:=Sous chaine($Doc;1+Position(":";$Doc);Longueur($Doc))
      $Long:=Longueur($Doc)
   Fin tant que
      `Concaténation du chemin d'accès pour sauvegarder le document.
      `Le fait d'ajouter l'extension au document permettra une gestion multi-plate-forme
   Doc:=Sous chaine(Doc;1;Longueur(Doc)-$Long)+"DocumentsWrite:LettreClient.4W7"
   WR SAUVER DOCUMENT(LaZone;doc;"4WR7")

(2) Vous souhaitez laisser l'utilisateur choisir lui-même le nom et le type dans lesquels il va enregistrer son document, et ensuite récupérer les valeurs choisies :

   NomDocument:=""
   TypeDocument:=""
   WR SAUVER DOCUMENT (LaZone;NomDocument;TypeDocument)
   Si (OK=1)
      ...    `Traitement du contenu de NomDocument et TypeDocument
   Fin de si

Référence

WR OUVRIR DOCUMENT.


4D - Documentation   Français   English   German   4D Write, Commandes par thèmes   4D Write, Liste alphabétique des commandes   4D Write, Constantes par thèmes   Retour   Précédent   Suivant