[access et vba]

Bonjour,

comment integrer du sql dans vba access merci de vos réponses
Configuration: Windows XP
Internet Explorer 7.0

4 réponses

  1. rebonjour

    tu dois creer la table correspandante ensuite tu rajoute le code suivant
    par ex:
    Private Sub CmdAppliquer_Click()
    DoCmd.RunSQL ("INSERT INTO (nom de la table)(les champs de la table) VALUES ('" & Me.variable & "','" & Me.variable & "')")
    On Error GoTo Err_CmdAppliquer_Click
    1. bonjour
      tu dois creer la table correspandante ensuite tu rajoute le code suivant
      par ex:
      Private Sub CmdAppliquer_Click()
      DoCmd.RunSQL ("INSERT INTO (nom de la table)(les champs de la table) VALUES ('" & Me.variable & "','" & Me.variable & "')")
      On Error GoTo Err_CmdAppliquer_Click
      1. ok je t'embete

        mais g un message d'erreur d'execution 3134

        Private Sub Commande100_Click()
        DoCmd.RunSQL ("INSERT INTO (CLIENTS)(num_client) VALUES ('" & Me.texte140 & "')")
        On Error GoTo Err_Commande100_Click

        y'a un truc qui je crois créer le problème en fait le champ num_client de la table CLIENT et relié au champ num_client de la table ACHAT (relation 1 à plusieurs) et normalement ça devrait s'incrémenté tout seul non?

        merci
      2. @celinenon je crois pas
        je pense pas mais il faut faire attention pour la rêquete sur vb car on l'ecris comme ca
        tu peux le faire sans les champs de la tables

        par exemple

        DoCmd.RunSQL ("INSERT INTO Ports VALUES ('" & Me.Numero_Port & "','" & Me.Etat & "','" & Me.Brassage & "','" & Me.Nom & "','" & Me.IP & "','" & Me.Code_port & "','" & Me.IP_Switch & "')")
    2. bonjour
      tu dois creer la table correspandante
      par ex:
      Private Sub CmdAppliquer_Click()
      DoCmd.RunSQL ("INSERT INTO (nom de la table) VALUES ('" & Me.variable & "','" & Me.variable & "')")
      On Error GoTo Err_CmdAppliquer_Click
      1. ok cependant
        Private Sub CmdAppliquer_Click()
        DoCmd.RunSQL ("INSERT INTO (nom de la table) VALUES
        Me.variable -> champ du formulaire
        ou j'indique le champ de la table?

        g essayé ça marche pas
        DoCmd.RunSQL ("INSERT INTO clients VALUES ('" & Me.texte40 & "')")
        mais il faut que j'indique le champ dans la table clients

        Merci pour ta réponse
    3. Modérateur
      Salut,

      on peut le mettre sur des évènements d'un formulaire, par exemple : un bouton appuyé, un choix dans une liste...
      1. ok mais par ex :
        Private Sub Commande168_Click()
        et je mets directement une formule sql

        end sub
        ça ne marche pas non?

        merci pour t précisions
      2. Modérateur
        Ben non, il faut dire à ACCESS que c'est du SQL et l'exécuter...