Enregistrer sur une BD Access par VB - VB/VBA/VBS - Programmation
Marsh Posté le 21-05-2004 à 11:43:29
Salut.
Bon, le problème est réglé. Mais curieusement, j'avais essayé le même code hier et il y avait une erreur à la compilation. Le code que j'ai utilisé est le suivant :
Dim cnn1 As ADODB.connection
Dim recordSet As ADODB.recordSet
Private Sub Form_Load()
Set cnn1 = New ADODB.connection
cnn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\CTI.mdb;Persist Security Info=False"
cnn1.Open
Set recordSet = New ADODB.recordSet
recordSet.CursorType = adOpenKeyset
recordSet.LockType = adLockOptimistic
recordSet.Open "DailySummary", cnn1, , , adCmdTable
recordSet.AddNew
recordSet!NOPID = "ATTT"
recordSet!Product = "IDTM"
recordSet!TrafficDate = "10/01/1000"
recordSet!Duration = 1000
recordSet!Rate = 1.2
recordSet.Update
booRecordAdded = True
MsgBox "Update réussi"
recordSet.Close
cnn1.Close
MsgBox "Connexion Fermée"
End Sub
Mais, je vous demande encore de l'aide pour mieux utiliser l'MSDN.
Merci d'avance.
Marsh Posté le 21-05-2004 à 00:13:38
Salut.
J'ai une petite application en VB et j'aimerai pouvoir enregistrer des infos sur ma base de données Access. Dans l'MSDN on parle de trois méthodes qui renvoient un objet Recordset : Connection.Execute, Command.Execute et Recordset.Open. J'ai déjà utilisé Recordset.Open pour la lecture mais d'après la doc, elle ne permet pas l'enregistrement. Comment utiliser l'une des deux autres méthodes
pour l'enregistrement?
Autre petite question. Je trouve des difficultés à trouver l'information dans l'MSDN. Connaissez vous une astuces pour tirer plus de profit de cette documentation.
Merci.