L'objet ADO Record représente un enregistrement dans une base de données, un fichier ou un répertoire dans un système de fichiers.
Set Objet_Record = Server.CreateObject("ADODB.Record")
ActiveX Data Objects permet de gérer des enregistrements provenant aussi bien des données structurées, telles que ceux des bases de données, que des données semi-structurées organisées en arborescence et possédant des noeuds à plusieurs niveaux comme dans la cas d'un système de fichiers.
L'objet Record, dans cette dernière situation correspond à un noeud unique de l'arborescence, comme un fichier ou un répertoire.
Si le noeud contient d'autres répertoires ou fichiers, alors cette collection de noeuds enfants correspond à un jeu d'enregistrements, autrement dit à un objet Recordset.
Set Obj_Recordset = Objet_Record.GetChildren
D'autre-part, les propriétés d'un noeud enfant sont assimilés à une collection de champs, soit à une collection Fields.
Les Collections| Collection |
|---|
| Description |
| Fields |
| contient une colonne de données avec un type commun. |
| Properties |
| contient toutes les objets Property pour une instance spécifique d'un objet. |
| Propriété |
|---|
| Description |
| Objet_Record.ActiveConnection = Objet_Connection |
| indique l'objet Connection d'appartenance de l'objet en cours. |
| Objet_Record.Mode = ConnectModeEnum |
| indique les autorisations de modification de données de l'objet Record. |
| Objet_Record.ParentURL = Adresse_URL |
| retourne une adresse URL absolue qui pointe l'enregistrement parent de l'objet Record en cours. |
| Objet_Record.RecordType = RecordTypeEnum |
| Objet_Record.Source = Chaîne de caractères |
| retourne la source de données de l'enregistrement en cours. |
| Objet_Record.State = ObjectStateEnum |
| retourne l'état de l'objet Record, c'est-à-dire s'il est ouvert ou fermé. |
| Méthode |
|---|
| Description |
| Objet_Record.Cancel |
| annule l'exécution de l'appel en attente. |
| Objet_Record.Close |
| ferme l'objet Record ouvert ainsi que tous les objets qui en dépendent. |
| Objet_Record.CopyRecord(Source, Destination, Nom_Utilisateur, Mot_Passe, CopyRecordOptionsEnum, Bool_Asynchrone) |
| copie un fichier ou un répertoire et son contenu vers une destination. |
| Objet_Record.DeleteRecord Source, Bool_Asynchrone |
| supprime l'entité représentée par un enregistrement. |
| Set Obj_Recordset = Objet_Record.GetChildren |
| retourne un objet Recordset dont les lignes représentent les fichiers et les sous-répertoires du répertoire représenté par l'objet Record. |
| Objet_Record.MoveRecord(Source, Destination, Nom_Utilisateur, Mot_Passe, MoveRecordOptionsEnum, Bool_Asynchrone) |
| déplace un fichier ou un répertoire et son contenu vers un destination. |
| Objet_Record.Open Source, ActiveConnection, ConnectModeEnum, RecordCreateOptionsEnum, RecordOpenOptionsEnum, Nom_Utilisateur, Mot_Passe |
| ouvre un objet Record existant ou en crée un nouveau. |
<html>
<body>
<%
Dim Objet_Record, Champ
Set Objet_Record= Server.CreateObject("ADODB.Record")
Objet_Record.Open "", "URL=http://localhost/repertoire"
Response.Write "<table border=1>"
For each Champ in Objet_Record.Fields
Response.Write "<tr><td>" & Champ.Name & _
"</td><td>" & Champ.Value & _
"</td></tr>"
Next
Response.Write "</table>"
Objet_Record.Close
Set Objet_Record = Nothing
%>
</body>
</html> |