Insérer un enregistrement

Insérer un enregistrement - VB/VBA/VBS - Programmation

Marsh Posté le 24-05-2013 à 12:20:57    

Bonjour j'ai un problème en vba, je m'explique. J'ai créé un formulaire demandant de renseigner nom, prenom, mdp et je voudrais qu'en validant, ça envoi les information dans une table mais je bloque :s. Voici mon code  
 
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim sql As String
 
 
Set db = CurrentDb
 
sql = "INSERT INTO personne VALUES(" & tbName.Value & "," & tbFname.Value & "," & tbPass.Value & " )"
 
Si quelqu'un a une idée je suis preneur :)

Reply

Marsh Posté le 24-05-2013 à 12:20:57   

Reply

Marsh Posté le 24-05-2013 à 14:46:23    

Au final j'ai trouvé, il suffisait de virer la ligne Dim rs As DAO.Recordset et de rajouter à la fin:
DoCmd.RunSQL sql
 
mais maintenant jai un autre problème qui se situe dans la requete:
"INSERT INTO personne(ID_Personne,Nom,Prenom) VALUES('" & tbName.Value & "','" & tbFname & "');"
je ne sais pas par quoi remplacer ID_Personne dans Values, j'ai essayé plusieurs choses, ne rien mettre, NULL, mais sans succès, quelqu'un pour m'aider ?
Si je met une valeur, par exemple 5 ça me met une erreur: Violation de la contrainte PRIMARY KEY "PK_Personne". Impossible d'insérer une clé en double dans l'objet "dbo.Personne". La valeur de la clé dupliquée est (5)


Message édité par adzzz77133 le 24-05-2013 à 14:51:26
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed