XI. L'objet View▲
La création et la modification d'un objet View se gèrent de la même manière que pour les objets Procedure. C'est pourquoi nous ne nous rééditerons pas ces notions ici.
Il faut cependant savoir que la seule vraie différence existant entre l'Objet Procédure et l'objet View sont que ce dernier n'accepte que des requêtes Select sans paramètre.
XI-A. Conclusion sur les objets View et Procedure▲
Ces deux objets ne présentent aucune difficulté majeure à programmer si ce n'est de faire attention à toujours affecter les objets Command de façon explicite.
Dans le cas des requêtes renvoyant des enregistrements (View ou Procedure) on peut directement valoriser un recordset avec.
Ne perdez pas de temps à paramétrer l'objet Command lors de la création de requête ou de procédure, seule la propriété CommandText compte.
Pour finir voilà un code qui permet de récupérer l'ensemble des requêtes / procédures de la base de données sous leurs formes SQL.
Private Sub Command1_Click()
Dim cnn1 As ADODB.Connection
Dim Catalogue As ADOX.Catalog, fso As New FileSystemObject
Dim Fich As TextStream, MaCmd As ADODB.Command
Dim MaProc As ADOX.Procedure, MaVue As ADOX.View
Set Fich = fso.CreateTextFile("d:\recupTexte.txt", True)
Set Catalogue = New ADOX.Catalog
Set cnn1 = New ADODB.Connection
With cnn1
.Provider = "Microsoft.Jet.OLEDB.4.0;"
.ConnectionTimeout = 30
.CursorLocation = adUseClient
.IsolationLevel = adXactChaos
.Mode = adModeShareExclusive
.Properties("Jet OLEDB:System database") =
"D:\User\jmarc\tutorial\ADOX\system.mdw"
.Open "Data Source=D:\User\jmarc\tutorial\ADOX\baseheb.mdb ;User
Id=Admin; Password="
End With
Catalogue.ActiveConnection = cnn1
For Each MaProc In Catalogue.Procedures
Fich.WriteLine "NOUVELLE PROCEDURE"
Fich.WriteLine "Nom = " & MaProc.Name
Set MaCmd = MaProc.Command
Fich.WriteLine MaCmd.CommandText
Next
For Each MaVue In Catalogue.Views
Fich.WriteLine "NOUVELLE VUE"
Fich.WriteLine "Nom = " & MaVue.Name
Set MaCmd = MaVue.Command
Fich.WriteLine MaCmd.CommandText
Next
Fich.Close
End SubVoilà vous savez maintenant créer par le code une base de données, nous allons attaquer une partie beaucoup plus complexe, mais néanmoins essentielle, la gestion des utilisateurs.