[WD17] Lire fichier C/S externe [Résolu]

[clocktime]

Bonjour,

Comment lire un enregistrement d'un fichier externe Hyperfile CS sans l'inclure dans l'analyse


Merci

[hpascal]

Bonjour

Regarde du coté de HDéclareExterne

[clocktime]

Bonjour

Je viens d'essayer

La connexion s'effectue correctement
cependant il ne valide pas le HDeclareExterne()

Est ce que la syntaxe est correcte?

Merci

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Distant est une Connexion

// Paramètres de la connexion
Distant..Provider = hAccèsHFClientServeur
Distant..Utilisateur = "Admin"
Distant..MotDePasse = ""
Distant..Serveur = "192.168.1.1"
Distant..BaseDeDonnées = "LOCASTOCK"
Distant..Cryptage = hCryptageNon



// Ouverture de la connexion
	HOuvreConnexion(Distant) 

	SI HDéclareExterne("BASE_CLIENT","BASE_CLIENT","Admin","","LOCASTOCK",hAccèsHFClientServeur,hOLectureEcriture)
	 alors
		Info("c cool")
	SINON
		Info("sniff")
	FIN

[mail.spam]

Bonjour,

Je n'ai jamais eu besoin de cette fonction mais d'après l'aide j'utiliserai la syntaxe suivante.

Code :

<Résultat> = HDéclareExterne(<Nom du fichier> , <Nom alias> , <Nom de la connexion>)

[wimbish]

Bonjour,
Utilises la fonction HErreurInfo() pour obtenir des informations plus précises sur la raison de l’échec de la fonction HdéclareExterne().

[clocktime]

Merci ça marche cependant je peux modifier un enregistrement distant mais je ne peux pas en ajouter???

Avez vous une idée pourquoi?

Merci

Code :

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
Distant est une Connexion

// Paramètres de la connexion
Distant..Provider = hAccèsHFClientServeur
Distant..Utilisateur = "Admin"
Distant..MotDePasse = ""
Distant..Serveur = "Denis-PC"
Distant..BaseDeDonnées = "LOCASTOCK"
Distant..Cryptage = hCryptageNon
Distant..Accès=hOLectureEcriture

SI HDéclareExterne("BASE_CLIENT.fic","BASE_CLIENT",DISTANT) ALORS
	Info("good")
	BASE_CLIENT est une Source de Données="BASE_CLIENT"
	
HLitDernier(BASE_CLIENT)
Info(BASE_CLIENT.societe)

	
	BASE_CLIENT.SOCIETE="test" //SAI_Société

	SI HAjoute(BASE_CLIENT) ALORS //Ici Hmodifie fonctionne mais pas Hajoute()
		Info("goog")
	FIN

SINON
	Info("sniff")
FIN

[mail.spam]

essaie d'afficher le message d'erreur lié au hAjoute

met le code suivant à la place de

SI HAjoute(BASE_CLIENT) ALORS //Ici Hmodifie fonctionne mais pas Hajoute()
Info("goog")
FIN

Code :

1
2
3
4
5
SI pas HAjoute(BASE_CLIENT) ALORS
	erreur(HErreurInfo(hErrComplet))
sinon
	info("Enregistrement ajouter")
FIN

[clocktime]

Bien vue , j'ai une erreur de doublon

Merci

[mail.spam]

Dans tes programme pense toujours a tdster les valeur de retour des fonction windev et d'en afficher les message d'erreur