ADO et Syntaxe VB

Signaler
Messages postés
9
Date d'inscription
vendredi 16 janvier 2004
Statut
Membre
Dernière intervention
2 juin 2004
-
Messages postés
9
Date d'inscription
vendredi 16 janvier 2004
Statut
Membre
Dernière intervention
2 juin 2004
-
Bonjour,

Je voudrais faire une requête d'insertion de valeurs contenues dans un formulaire pour les mettre dans ma base Access en ADO. Seulement, il y a bien longtemps que je n'ai pas touché à l'ADO et à VB et je ne suis pas sur de ma syntaxe. Pour le code suivant, on me dit "erreur de syntaxe dans l'instruction Insert Into".
Merci de bien vouloir m'aider :-)

Private Sub b_ok_Click()
Dim req As String
Dim cnx As New ADODB.Connection
Dim rs As New ADODB.Recordset
req = "Insert into VEHICULE Values "
cnx.ConnectionString = ajout_veh.ConnectionString
cnx.Open
cnx.Execute (req & TXT_immat.Text & ", " & TXT_date.Text & ", " & CMB_Service.Text & ", " & CMB_carburant.Text & ", " & CMB_type.Text & " ;")

End Sub

2 réponses

Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
81
Salut ZarnoVB
Ce n'est pas un problème d'ADO ni VB, mais de SQL :
req = "Insert Into VEHICULE " & _
"(NomChamp1, NomChamp2, ..., NomChampN) " & _
"Values ('TextePourChamp1', ChiffrePourChamp2, ... );"

Règles :
- Si le champ est du texte : Mettre des ' devant et derrières les valeurs à insérer
- Si le champ est numérique, pas de '
- Si le champ est Date : ' et # comme '#01/01/2004#'

Vala
Jack
Messages postés
9
Date d'inscription
vendredi 16 janvier 2004
Statut
Membre
Dernière intervention
2 juin 2004

Merci à toi, ça fonctionne :)

Tant que j'y suis, une fois l'enregistrement effectué et une msg box le confirmant, j'aimerais que le form se ferme automatiquement (il fait parti d'une MDI). Il me semblait qu'il fallait faire Unload!Me ou quelque chose comme ça, mais ça ne fonctionne pas, comment faire ?