Manipulation d'un composant session

Citation:

---

with Session do
begin
ConfigMode := cmSession;
try
Dir:=Unite+'Saturne\'+exercice;
if not DirectoryExists(Dir) then
ForceDirectories(Dir);
AddStandardAlias('Saturne',Dir,'PARADOX');
finally
ConfigMode := cmAll;
end;
end;

---

Bonjour a tous ,
ce code que vous voyez permet de creer un alias dont le dir varie en fonction de l'annee. Et cela marche tres bien.
Voici mon problem: J'utilise des tables paradox en reseau, et je manipule beaucoup de requette. alors il arrive des fois que j'ai des messages suivants à l'ouverture de certaines requtes:"le fichier verrou est devenu trop important". Question: qu'es ce qui a manqué dans mon code?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

With Session do Begin ConfigMode := cmSession; Try Dir:=Unite+'Saturne\'+exercice; if not DirectoryExists(Dir) then ForceDirectories(Dir); NetFileDir := Dir1 // Chemin réseau PrivateDir :=Dir2 // Chemin local AddStandardAlias('Saturne',Dir,'PARADOX'); Finally ConfigMode := cmAll; end; end;

---

Pour le chemin réseau toutes les application doivent pointé vers le meme répertoires vous pouvez indiquer le meme chemin que Dir des données
et le chemin local c'erst le dossier qui sera utiliser sur votres machine pour créer les fichiers temporaires il préférable d'indiquer un dossier dans le chemin de votre applications pour pouvoir le vidé de temps autres supprimer les fameux fichier que ce créer lorsque en éxécutes des reqettes.

es ce que le chemin local doit etre creer sur toutes les machines clientes qui utilisent l'application?

Oui car c'est ce dossier qui utiliser localement par ton application créer les tables temporaires

Comment dois je vider ce fichier? par pragram ou manuel? enplus es ce qu'il est nécessaire de creer d'autres session?

Citation:

---

NetFileDir := Dir1 // Chemin réseau
PrivateDir :=Dir2// Chemin local

---

Lorsque je lance l'exe, arrivé sur les lignes NetFileDir et PrivateDir , j'ai le message suivant qui apparait: "Table(s) ouvertes-Impossibles d'executer cette opération". Que faire?

ou est ce que vous avez insérer le code ?
il faut le faire avant l'ouveture de tes tables. lors de la création de ton datamodule par exemples.

J'ai mis le code sous un bouton BitBtn. mais toutes mes tables sont fermés.

Tu avais raison. Il y a des tables qui étaient ouvertes. Mon application utilise 3 alias. Alors dois_je créer trois session distinct pour gérer ces alias? comment manipuler trois alias dans une application?

non c'est pas nécéssaire vous pouvez créer autant d'alias qu'il faut.

merci , je crois que cela marche tres bien. A plus tard sur developpez.com

bonjour,j'ai presque le méme pb
dans mon administrateur bde j'ai que netdir et j'ai pas trouvé le private dir

Citation:

---

With Session do
Begin
ConfigMode := cmSession;
Try
NetFileDir := chemin_base // Chemin réseau
PrivateDir :=chemin prive // Chemin local
AddStandardAlias('NomAlias',chemin_base,'PARADOX');
Finally
ConfigMode := cmAll;
end;
end;

---

CE pogram peut vous aider. Il n'y a pas de privateDir dans l'administrateur BDE

je dois ecrir ce code sur le serveur,ou il ya ecri chemin base et chemin serveur qque je dois mentionné?je veux dire est ce que j'ecri les chemin de tt les poste en reseau?!

non c'est au niveau de l'appication client.
tous les application client doivent pointé vers le meme Net dir et avoir son propre private Dir