MS Acess 2003 - VBA pour la requête Update SQL?

Question

hey les gars, quelqu'un peut-il me montrer la simple requête de mise à jour via vb? J'ai besoin d'ajouter de nouveaux champs à la table (juste 3) et ajouter quelques boîtes de texte sur un formulaire afin que les utilisateurs puissent ajouter des données supplémentaires par rapport à l'enregistrement (qui est déjà ce que ce formulaire est basé). Donc la première forme que j'ai est une forme qui remplit une liste, quand l'utilisateur clique deux fois sur une sélection de cette liste, elle ouvre un nouveau formulaire, de sorte que l'ID de la table qui est liée à cette forme que j'ai besoin d'ajouter ces boîtes de texte (toutes les listes déroulantes et les zones de texte relatives à un enregistrement sont liées à la forme active à ce stade, mais elles sont toutes non liées.) En cliquant sur un bouton, il y a déjà à la table). Je n'ai pas créé ceci cependant, il a été construit par quelqu'un qui n'est plus là, et apparemment est meilleur que moi sur ce truc. Mon problème est qu'il y a tellement de vb qui vérifie les enregistrements, et diverses instructions sql basées sur le cas, que je ne peux pas le déchiffrer sous sa forme la plus simple. Donc, je cherchais un exemple simple d'une instruction sql de mise à jour dans vb afin que je puisse essayer de le séparer.

je en ai besoin de mettre à jour l'enregistrement en fonction de l'ID: sql OÙ RecordID = me.RecordID

En fait, je pensais que je savais comment faire cela à partir d'exemples, mais chaque fois que je, puis essayez d'exécuter En cliquant sur le bouton, j'obtiens une erreur d'exécution de l'erreur SYNTAX, et le débogage ne fait que mettre en évidence la partie db.execute (sql). J'ai donc essayé d'obtenir la fenêtre immédiate de l'instruction SQL résultant, et il semble bien pour moi:

UPDATE tblMain 
    SET [Name] = "John Doe", 
     [DATE] = #9/30/2009#, 
     [TYPE] = "TypeA", 
WHERE RecordID = 958; 

Puis-je mettre à jour une table sans tenir compte de tous les domaines dans le tableau (parce que celui-ci a 15 plus la nouveau 3, donc je suis ignorant sur 14 champs ici, mais je ne veux pas modifier ces de toute façon ???

donc, comme toujours, je vous remercie de l'aide yall !! Merci

EDIT:

Désolé, je l'oublie toujours .... Je l'essayais actaully DAO ... .

Dim db as DAO.Database 
    Dim sql as String 
    set db = CurrentDb 

etc

Answer 1

Vous étiez thaaat fermer! Vous avez une virgule supplémentaire simple après votre dernière colonne. Débarrassez-vous et ça fonctionne bien.

UPDATE tblMain SET 
[Name] = "John Doe", 
[DATE] = #9/30/2009#, 
[TYPE] = "TypeA" 
WHERE RecordID = 958; 

Oui, vous ne pouvez absolument mettre à jour que quelques colonnes au lieu de toutes. C'est une pratique exemplaire, BTW.

Enfin, il est considéré comme une mauvaise pratique de nommer vos colonnes après des mots réservés comme "Nom" et "Date", mais je sais que vous avez hérité de cela.

Answer 2

Vous avez été sage d'inclure Debug.Print sql dans votre code. bpayne a déjà souligné la virgule supplémentaire dans votre instruction SQL.

Je tiens à signaler une autre technique de dépannage que vous pouvez trouver utile pour déboguer des problèmes d'instructions SQL.

Copiez l'instruction à partir de la fenêtre Exécution et collez-la dans la vue SQL d'une nouvelle requête. Modifiez la requête dans le concepteur de requêtes jusqu'à ce que vous puissiez la faire fonctionner, puis modifiez votre code VBA pour générer une instruction SQL correspondante.

Dans ce cas, vous n'avez peut-être pas remarqué la virgule supplémentaire. Toutefois, vous pouvez créer une nouvelle requête et créer l'instruction UPDATE à partir de zéro dans le concepteur de requêtes. Après avoir fonctionné, vous pouvez comparer sa vue SQL à la requête qui échoue.