Discussion :

[mogwai162]

Bonjour.

Voilà, tout est dans le titre, j'ai une analyse et pour chaque, ou presque, fichier de cette analyse, j'ai deux fichiers physiques et que j'utiliserai en permanence et un cdeuxième que j'utiliserai de temps à autres mlais en même temps que le premier.

Est ce que ça marche ? Pouvez vous m'expliquer comment on fait ? Pouvez vous joindre un petit bout de code (seulement l'accès au deuxième fichier et sa différentiation du premier) pour que je voie mieux de quoi il retourne ?

Merci

[hpascal]

Bonjour Patrick

Tu peux faire ça simplement avec un alias

Il y a un exemple dans l'aide qui illustre ce que tu veux faire : Exemple HAlias

[mogwai162]

Je te remercie c'est nickel.

Juste que ça m'oblige a gérer un alias par fichier... un peu laborieux tout de même j'ai environ 70 fichiers concernés.

Je clôture.

A bientôt

[hpascal]

Le nom du 2ème fichier est imposé ?

Si ce n'est pas le cas une petite boucle sur tous les fichiers de l'analyse et le tour est joué

[mogwai162]

Bonjour !

Bon.... j'ai voulu faire un essai avant de me lancer vraiment voici le code que j'ai ecrit :

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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
Fichiers_Locaux, gcnxFichiers_Serveur sont des Connexions
 
Fichiers_Locaux..Utilisateur	= ...
Fichiers_Locaux..MotDePasse		= ...
Fichiers_Locaux..Serveur		= "localhost"
Fichiers_Locaux..BaseDeDonnées	= "base locale"
Fichiers_Locaux..Provider = hAccèsHFClientServeur
 
gcnxFichiers_Serveur..Utilisateur = "....."
gcnxFichiers_Serveur..MotDePasse = ""
gcnxFichiers_Serveur..Serveur = "adresse ip serveur"
gcnxFichiers_Serveur..BaseDeDonnées = "base serveur test"
gcnxFichiers_Serveur..Provider = hAccèsHFClientServeur
 
//gcnxFichiers_Serveur..Accès = hOLectureEcriture
 
SI PAS HOuvreConnexion(Fichiers_Locaux) ALORS
	Erreur("a",HErreurInfo())
FIN
 
SI PAS HOuvreConnexion(gcnxFichiers_Serveur)  ALORS
	Erreur("b",HErreurInfo())
FIN
 
SI PAS HChangeConnexion("*",Fichiers_Locaux) ALORS
	Erreur("c",HErreurInfo())
FIN
 
SRV_TIERS est une Source de Données
 
SI PAS HAlias(TIERS,SRV_TIERS) ALORS
	Erreur("d",HErreurInfo())
FIN
 
SI PAS HChangeConnexion(SRV_TIERS,gcnxFichiers_Serveur)     ALORS
	Erreur("e",HErreurInfo())
FIN
 
HOuvre(TIERS)
HOuvre(SRV_TIERS)
 
HLitPremier(TIERS)
Info("TIERS = "+TIERS.TIER_ID,HEnDehors())
 
Info(SRV_TIERS..BaseDeDonnées,SRV_TIERS..Connexion)
 
HLitPremier(SRV_TIERS)
Info("SRV TIERS = "+SRV_TIERS.TIER_ID,HEnDehors())
 
HGèreIntégrité(Faux)
 
POUR TOUT SRV_TIERS sur TIER_ID
	SI PAS HCopieEnreg(TIERS,SRV_TIERS,hCopieIdAuto) ALORS
		Erreur(HErreurInfo())
	FIN
	SI PAS HAjoute(TIERS) ALORS
		Erreur(HErreurInfo())
	FIN
	Trace(TIERS.TIER_ID)	
FIN
 
HGèreIntégrité(Vrai)
 
Info("Terminé")

JE n'ai aucune erreur quand je lance le code...

Mon fichier local est vide et je veux le remplir avec le fichier serveur : j'ai controlé


Seulement, même si le fichier SRV-TIERS a bien la bonne connexion, il ne peut le lire, il sembre vide...

Alors je me plante ou ????

[mogwai162]

J'ai fini par comprendre pourquoi :

En fait halias 'modifie' egalement le nom physique du fichier.

Donc, dans ce cas, il faut faire un hchangeNom après l'halias afin de rétablir le nom du fichier sur le nom original

A bientôt