Discussion :

[Yomdeb]

Je cherche à faire fonctionner des requetes UPDATE dans un évènement close dans une appli access 2000 se connectant à ma base SQL Server.

1- Lorsque je teste la requete SQL via l'analyseur de requete SQL :
Ca fonctionne.
UPDATE contacts
SET NbAppels = 120
WHERE [num_contact]= 35718


2- J'accède maintenant à SQL Server par access via ADP et dans un evenement close, je mets le code suivant ( qui fonctionne sur un access sans SQL Server en mdb ) :
CurrentDb.Execute "UPDATE contacts SET NbAppels = 120 WHERE [num_contact]= 35718"
Le message d'erreur : Variable objet ou variable de bloc With non définie apparait

Après plusieurs essais, je décide de passer par une Vue. Le code SQL est controlé avec succès mais l'execution me dit :
L'analyse du volet SQL a détecté les erreurs suivantes :
Commande SQL non gérée

Quelqu'un a-t'il une idée ?

Je suis familier d'access mdb. C'est la première fois que j'essaie de migrer vers SQL Server

[LedZeppII]

Salut,
CurrentDB ne fonctionne qu'avec une base mdb ou mde.
Pour exécuter une commande SQL sur le serveur j'utilise ADO.
Je passe par la connexion du project adp currentProject.Connection
Si j'ai bonne mémoire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

currentProject.Connection.Execute strSql, AffRows

strSQL est une chaîne contenant la requête SQL Server.
AffRows est un entier long qui contient le nombre de ligne affectées.
Si ça marche pas directement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim oConn as New ADOBO.Connection
Set oConn = currentProject.Connection
oConn.Execute strSql, AffRows

(Syntaxe à vérifier - j'ai écris de mémoire)