bonjour tout le monde . Jai réaliser un logiciel qui fonctionne très bien en HFSQL classique une application qui j'aire plusieurs exercice
mais Jai décide de rendre le projet en mode HFSQL client serveur
code de la fenêtre déclaration globale
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 ROCEDURE MaFenêtre() sRepertoirte1 est une chaîne sRepertoirte1=ComplèteRep("C:\Ordre de facturation\Societes\") UnRépertoire, ResListeRépertoire sont des chaînes ResListeRépertoire = fListeRépertoire(sRepertoirte1) POUR TOUTE CHAÎNE UnRépertoire DE ResListeRépertoire SEPAREE PAR RC xSoss est un numérique xSoss=ChaîneOccurrence(UnRépertoire,"\") +1 sOs est une chaîne sOs=ExtraitChaîne(UnRépertoire,xSoss,"\") TableAjoute(TABLE_liste_fichiers,sOs) FIN
mais e mode HFSQL client serveur
Jai utiliser le code :
maConnexion est une Connexion
Partager