J'ai trouvé réponse à ma question. Cependant j'en ai une autre !
Private Sub Command1_Click()
Dim mdb As Database
Dim strSQL As String
Dim rs As Recordset
Set mdb = OpenDatabase(App.path & "\Bibli.mdb" )
strSQL = "INSERT INTO Utilisateur (IP,Taille,Nom_Fichier,Nick) VALUES('205.123.12.2',1234,'C:\allo.sys','Un4GivN';"
Set rs = mdb.OpenRecordset(strSQL)
rs.Close
mdb.Close
Set rs = Nothing
Set mdb = Nothing
End Sub
L'instruction SQL ne fonctionne pas ! Pourtant, dans le "Visual Data Manager", elle fonctionne très bien. Qu'est-ce que je fais de pas correct !?