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.