Procedures, exemple de méthode Delete (VB)
Le code suivant montre comment supprimer une procédure à l’aide de la méthode Delete de la collection Procedures.
' BeginDeleteProcedureVB
Sub Main()
On Error GoTo DeleteProcedureError
Dim cat As New ADOX.Catalog
' Open the catalog.
cat.ActiveConnection = _
"Provider='Microsoft.Jet.OLEDB.4.0';" & _
"Data Source='Northwind.mdb';"
' Delete the procedure.
cat.Procedures.Delete "CustomerById"
'Clean up.
Set cat.ActiveConnection = Nothing
Set cat = Nothing
Exit Sub
DeleteProcedureError:
Set cat = Nothing
If Err <> 0 Then
MsgBox Err.Source & "-->" & Err.Description, , "Error"
End If
End Sub
' EndDeleteProcedureVB
Voir aussi
ActiveConnection, propriété (ADOX)
Catalog, objet (ADOX)
Delete, méthode (collections ADOX)
Procedure, objet (ADOX)
Procedures, collection (ADOX)
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour