Discussion :

[YDevY]

Bonjour,

Dans mon projet WD, j'ai une analyse qui contient des fichiers pointant sur une base de données Access située sur mon PC.
Il y a donc une connexion décrite dans l'analyse pour ces fichiers.

Dans le programme, je fais une copie de cette base dans un autre répertoire et je veux travailler sur cette copie.

J'ai donc fait le code suivant :

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
PROCEDURE ConnexionA(leChemin,DB)
 
//============= connexion à la base de données Acess 97 
nNumConnexion est un entier = SQLConnecte(leChemin+DB,"","","","ACCESS","Microsoft.Jet.OLEDB.4.0")
 
SI nNumConnexion = 0 ALORS
	SQLInfoGene()
	Erreur("La connexion à la source de données" + DB + ...
	" a échoué."+RC+...
	"Code erreur : " + SQL.Erreur +RC+...
	SQL.MesErreur)
SINON
	RENVOYER nNumConnexion	
FIN
 
// Changement de connexion
SI PAS SQLChangeConnexion(ConnexionA("C:\Mes Projets\VISU\Exe\","Gestion.mdb")) ALORS
	Erreur("pas de changement de connexion")
FIN
 
//suppression de la liste des salaries
SQLExec("supSalaries","DELETE FROM Salaries")
SQLFerme("supSalaries")
SQLDeconnecte()

Tout se passe bien, pas de message d'erreur sauf que ... c'est la base d'origine dont la table Salaries qui est vidée, pas la base que je souhaite.

Purquoi cela ne fonctionne t-il pas ? Je pense que l'erreur vient de moi mais ou ?

Merci

[YDevY]

J'ai avançé dans la résolution de mon problème :

En rajoutant :

SQLDeconnecte() au début de ma fonction ConnexionA

et en corrigeant la fonction SQLExec() que j'avais mal formée (j'ai mis le nom de la requête avant le texte de la requête alors qu'il faut faire l'inverse).

J'ai encore d'autres problèmes mais au moins celui ci est résolu.