Procedures, exemple de méthode Refresh (VB)
Le code suivant montre comment actualiser la collection Procedures d’un catalogue. Cela est nécessaire avant que les objets Procedure soient accessibles à parti du catalogue.
' BeginProceduresRefreshVB
Sub Main()
On Error GoTo ProcedureRefreshError
Dim cat As New ADOX.Catalog
' Open the Catalog
cat.ActiveConnection = _
"Provider='Microsoft.Jet.OLEDB.4.0';" & _
"Data Source='Northwind.mdb';"
' Refresh the Procedures collection
cat.Procedures.Refresh
'Clean up
Set cat.ActiveConnection = Nothing
Set cat = Nothing
Exit Sub
ProcedureRefreshError:
Set cat = Nothing
If Err <> 0 Then
MsgBox Err.Source & "-->" & Err.Description, , "Error"
End If
End Sub
' EndProceduresRefreshVB
Voir aussi
Catalog, objet (ADOX)
Procedures, collection (ADOX)
Refresh, méthode (ADO)
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