Discussion :

[nemog]

Bonjour,

un petit souci bloquant (pour moi )

Je veux mettre à jour une table dans plusieurs bases dans le même répertoire
= mettre à jour un champ de la table avec un texte saisi dans un textbox de la base ouverte
Pour la selection des fichiers : pas de problème

Mais quant au UPDATE, j'ai systématiquement l'erreur 3129 : Instruction SQL non valide

j'ai essayé 2 methodes : une de moi-même et une inspirée d'un post de ce forum

Pouvez-vous me dire ce qui cloche ?

Code :

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

1
2
3
   monsql = "UPDATE TabPBXMod IN " & StrComplet & " SET TabPBXMod.Version = " & Me.RechGlob & "WHERE (((TabPBXMod.Version) Is Not Null))"
 
 monsql = "UPDATE [MS Access;Database= '" & StrComplet & "'].TabPBXmod SET TabPBXmod.Version = '" & StrRechGlob & "' WHERE TabPBXmod.Version is not null"

StrComplet est le nom du fichier à ouvrir, StrRechGlob = me.RechGlob

Merci

[nemog]

Bon, j'ai trouvé :

IS NOT NULL : pas bon

<> Null : bon

moi : *on

[tee_grandbois]

bonjour,

Bon, j'ai trouvé :

IS NOT NULL : pas bon

<> Null : bon

je trouve vraiment étonnant que ce soit la solution de ton problème ... as-tu vraiment testé tous les cas ?
l'expression <> null est à éviter car elle est toujours fausse, comme précisé dans cet article dans l'encadré gris.
IS NOT NULL est une syntaxe correcte, donc, je pense que l'erreur 3129 ne vient pas de là ...

Ce qui me saute au yeux en lisant les 2 codes postés, c'est:
pour le premier code, je pense qu'il manque les apostrophes autour de Me.RechGlob et un espace avant le WHERE
pour le second, les apostrophes sont en trop autour de StrComplet

[hyperion13]

Salut
N'est-ce pas plus tôt

Code :

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

monsql = "UPDATE TabPBXMod IN '" & StrComplet & "' SET TabPBXMod.Version = '" & Me.RechGlob & "' WHERE (((TabPBXMod.Version) Is Not Null))"

[nemog]

Merci,
Je n' ai pas voulu m'étaler parce que je pensais que ça ne susciterait pas beaucoup d'intérêt

J'ai en fait corrigé plusieurs erreurs en même temps et ai cru que c'était l'histoire de "Is not null"

Mon code qui marche :

Code :

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

monsql = "UPDATE TabPBXMod IN '" & StrComplet & "' SET TabPBXMod.Version = '" & Me.RechGlob & "' WHERE (((TabPBXMod.Version) <> Null))"

Merci @Tee_grandbois pour la précision sur les apostrophes :
donc apostrophe pour les objets mais pas pour les variables, c'est ça ?

Et je viens de reprendre ma version "fausse", j'avais ecrit trop vite la ligne suivante c'est à dire

Code :

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

DoCmd.RunSQL "monsql"

et c'est ça qui provoquait l' erreur 3129.
La prochaine fois, j'utiliserai quelque chose du type

Code :

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

 mabase.Execute ("blablablablabla")

, ce sera plus simple

Mais après, j'avais un autre type d'erreur - je n'ai pas noté lequel

Voila, vous savez tout !

[tee_grandbois]

salut hyperion13

Salut
N'est-ce pas plus tôt

Code :

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

monsql = "UPDATE TabPBXMod IN '" & StrComplet & "' SET TabPBXMod.Version = '" & Me.RechGlob & "' WHERE (((TabPBXMod.Version) Is Not Null))"

en effet ... mea culpa, j'ai mal lu, il faut bien des apostrophes autour du nom de la base distante

Mon code qui marche :

Code :

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

monsql = "UPDATE TabPBXMod IN '" & StrComplet & "' SET TabPBXMod.Version = '" & Me.RechGlob & "' WHERE (((TabPBXMod.Version) <> Null))"

si cela fonctionne, tant mieux, mais <> null n'est toujours pas correct (as-tu lu l'article ?)

Code :

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

DoCmd.RunSQL "monsql"

et c'est ça qui provoquait l' erreur 3129.
La prochaine fois, j'utiliserai quelque chose du type

Code :

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

mabase.Execute ("blablablablabla")

ça ne change rien, Execute affichera aussi l'erreur 3129 si elle est présente

[nemog]

oui j'ai lu l'article mais n'ai pas tout compris

ma condition se voulait être : quand il y a quelque chose dans le champ Version de la table TabPBXmod

et je persiste, l'erreur 3129 était provoquée par les guillemets autour de monsql

Code :

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

DoCmd.RunSQL "monsql"

provoque l'erreur 3129