Ajout d’enregistrements avec AddNew (méthode)
Il s’agit de la syntaxe de base de la méthode AddNew :
Recordset.AddNew FieldList, Values
Les arguments FieldList et Values sont facultatifs. FieldList est soit un nom unique, soit un tableau de noms, soit des positions ordinales des champs dans le nouvel enregistrement.
L’argument Values est une valeur unique ou un tableau de valeurs pour les champs du nouvel enregistrement.
En règle générale, lorsque vous envisagez d’ajouter un seul enregistrement, vous appelez la méthode AddNew sans aucun argument. Plus précisément, vous allez appeler AddNew ; définir la valeur de chaque champ dans le nouvel enregistrement ; puis appeler Update ou UpdateBatch, ou les deux. Vous pouvez vous assurer que votre Recordset prend en charge l’ajout de nouveaux enregistrements à l’aide de la propriété Supports avec la constante énumérée adAddNew.
Le code suivant utilise cette technique pour ajouter un nouvel expéditeur à l’exemple de Recordset. SQL Server fournit automatiquement la valeur du champ ShipperID. Par conséquent, le code n’essaie pas de fournir une valeur de champ pour les nouveaux enregistrements.
'BeginAddNew1.1
If objRs.Supports(adAddNew) Then
With objRs
.AddNew
.Fields("CompanyName") = "Sample Shipper"
.Fields("Phone") = "(931) 555-6334"
.Update
End With
End If
'EndAddNew1.1
Notes
Étant donné que ce code utilise un Recordset déconnecté avec un curseur côté client en mode batch, vous devez reconnecter le Recordset à la source de données avec un nouvel objet Connection avant de pouvoir appeler la méthode UpdateBatch pour publier des modifications dans la base de données. Cela se fait facilement en utilisant la nouvelle fonction GetNewConnection.