je cherche ajouter un nouveau enregistrement dans une table
j'ai ecri la requette SQL avec l'instruction Insert Into.
mais ca na marche pas.
Private Sub Command1_Click()
Dim Re1 as String
Dim RL1 as String
Set X = CreateObject("ADODB.Connection")
X.Open ("DSN=usrping;APP=Visual Basic;WSID=CYBERCENTER;DATABASE=BDD_ping;LANGUAGE=Français;Trusted_Connection=Yes")
Re1 = "insert into Tab_Utilsateur(login_util, pwd_util ,nom_util, prenom_util,tel_util,titre_util) values(text1.text ,"&text2.text&","&text3.text&","&text4.text&","&text5.text&","&text6.text&")"
Set RL1 = X.Execute(Re1)
End Sub