Aller directement au contenu principal

Écrire du texte dans un fichier local

Structure

Écrire du texte dans un fichier local(sFileName, sStartFlag, sEndFlag, sToWrite)

Paramètres

| Paramètre | Type | Description
| sFileName | Chaîne | Nom du fichier situé dans le répertoire temporaire d'IndySoft qui doit être lu. Il s'agit simplement du nom du fichier suivi de l'extension ; il ne doit PAS inclure le chemin d'accès complet au répertoire.sStartFlag | Chaîne | le texte à rechercher pour marquer le début du texte à remplacer.sEndFlag | Chaîne | le texte à rechercher pour marquer la fin du texte à remplacer.sToWrite | Chaîne | la nouvelle valeur textuelle qui sera insérée dans le fichier texte |

Valeur de retour

Char

« 1 » = Réussite, « 0 » = Échec

Description

Les fonctions du groupe « Local File Read/Write Functions » sont généralement utilisées pour créer et lire des fichiers XML (ou autres) à partir d'un répertoire réseau commun, afin de synchroniser les données et les fonctionnalités d'IndySoft avec un autre système, tel qu'un système comptable. Cette fonction nécessite qu'un fichier nommé sFileName existe dans le répertoire temporaire IndySoft actuel – probablement copié à cet emplacement par la fonction « GetLocalFile ». Il s'agit généralement d'un fichier XML contenant des données provenant d'une autre application de base de données. Utilisez cette fonction pour réécrire du texte dans ce fichier, en remplaçant la valeur située après sStartFlag, mais avant sEndFlag. Donc, si vous lisez un fichier XML (voir l'extrait ci-dessous) et que vous devez remplacer la valeur « Unit Price » de « 1.260 » par une nouvelle valeur de « 1.340 »
 
<DiscountValue>0.84</DiscountValue>
<DiscountPercentage>40.0</DiscountPercentage>
<UnitPrice>1.260</UnitPrice>
<StandardCost>0.97</StandardCost>

Vous appelleriez alors la fonction comme suit :

if WriteTextToLocalFile('FromMyAccountingSystem.xml', '<UnitPrice>', '</UnitPrice>', '1.340') then
ShowMessage('Valeur écrite correctement')
Else
ShowMessage('La valeur n'a pas été écrite')
End If

Exemple

Aucun exemple fourni

Compatibilité des applications

Gestion de l'étalonnage IndySoft, Gestion des laboratoires commerciaux IndySoft, Gestion des outils IndySoft

Voir aussi

Aucun sujet connexe |