OVH Cloud OVH Cloud

Rafraichir base ADP

22 réponses
Avatar
Gafish
Bonjour,

J'ai un projet ADP qui est lié à une de mes bases SQL Server.
Par appel depuis Access d'une procédure stockée, je crée une table. Ensuite
dans mon code VBA je fais (enfin j'essaie de faire :) ) des opérations
dessus.
Le problème est que la table est créée, mais ma base Access n'est pas
"rafraîchie". Il ne reconnait donc pas cette table. Il faut que je fasse un
F5.
Quelle est la commande pour rafrachîr le contenu d'une base ADP en VBA ?

Merci d'avance

Arnaud

2 réponses

1 2 3
Avatar
J-Pierre
Tu publieras ton code quand ce sera prêt ? merci

J-Pierre
Avatar
Gafish
Voila le code du module :

Public Sub Refresh()

Application.CurrentProject.CloseConnection
' Réouverture de la connexion et test pour vérifier qu'elle est vide

Serveur = "NomServeur"
Login = "Login"
Motdepasse = "MotDePasse"
Base = "NomBase"
' PERSIST SECURITY INFO : mémorise ou non le mot de passe
Psi = True

sConnectionString = "PROVIDER=SQLOLEDB.1;PASSWORD=" _
& Motdepasse & ";PERSIST SECURITY INFO=" _
& Psi & ";USER ID=" & Login & ";INITIAL CATALOG=" _
& Base & ";DATA SOURCE=" & Serveur & ""

' Ouverture de la nouvelle connexion en lui donnant pour
' propriétés celles que nous venons de définir
Application.CurrentProject.OpenConnection sConnectionString


End Sub



"J-Pierre" a écrit dans le message de
news:%23I$
Tu publieras ton code quand ce sera prêt ? merci

J-Pierre




1 2 3