ExportDocContentToDirectory
Exporte le contenu d'un document Qubes
Syntaxe
function ExportDocContentToDirectory(docID: Integer; destinationDirectory: String; UpdateOfficeProperties: Boolean = False): String (Qubes 7.2)
function ExportDocContentToDirectory(docID: Integer; dirName: String): String
docID: identifiant numérique du document Qubes (doit exister)
dirName: dossier où est exporté le document (chemin complet, doit exister avec autorisation d'écriture)
UpdateOfficeProperties: mettre à jour les champs office
Remarques
Permet d'exporter le contenu d'un document Qubes.
L'identifiant numérique du document dans la base de données est généralement retrouvé via AppliedDocIDForRUD.
La fonction retourne le nom du fichier généré (nom complet, avec le chemin).
La fonction doit être appelée avec un utilisateur connecté qui a le droit de lire le document, sinon elle provoque une exception.
Exemples
// Exporte le doc DOC001 dans le dossier temporaire et affiche le chemin correspondant
InformationDlg(ExportDocContentToDirectory(AppliedDocIDForRUD('DOC001'), GetTemporaryFilesPath));
InformationDlg(ExportDocContentToDirectory(AppliedDocIDForRUD('DOC001'), GetTemporaryFilesPath));
// Exporte dans le dossier temporaire le document de RUD PRW147
// et le renomme avec le nom de la rud au lieu de
// rud + version + titre.
var docId := AppliedDocIDForRUD('PRW417');
var destDir := GetTemporaryFilesPath;
var exportedFileName := ExportDocContentToDirectory(docId, destDir);
var destFileName := destDir + DocRUDForDocID(docId) + ExtractFileExt(exportedFileName);
RenameFile(exportedFileName, destFileName);
// et le renomme avec le nom de la rud au lieu de
// rud + version + titre.
var docId := AppliedDocIDForRUD('PRW417');
var destDir := GetTemporaryFilesPath;
var exportedFileName := ExportDocContentToDirectory(docId, destDir);
var destFileName := destDir + DocRUDForDocID(docId) + ExtractFileExt(exportedFileName);
RenameFile(exportedFileName, destFileName);