L'objet ADO Fields représente une colonne d'enregistrement possèdant un type commun de données, à l'intérieur d'un jeu d'enregistrement.

Objet_Field.Collection | Propriété | Méthode

L'utilisation de la propriété Value de l'objet Field permet de fixer ou de retourner les données pour l'enregistrement courant.

Objet_Field.Value = Valeur
Valeur = Objet_Field.Value

Les objets Field sont accessibles à partir d'une collection Fields. Ainsi, une boucle For Each...Next permet d'extraire chaque objet Field puis d'appliquer un traitement particulier au champ.

For Each Objet_Field in Objet_Recordset.Fields
 'Traitement à appliquer à Objet_Field...
Les Collections
Collection
Description
Properties
représente toutes les propriétés d'un objet Field
Les Propriétés
Propriété
Description
Objet_Field.ActualSize = Taille
retourne la taille actuelle des données du champ.
Objet_Field.Attributes = Entier
retourne un entier long indiquant une ou plusieurs caractéristiques de l'objet Field.
Objet_Field.DefinedSize = Taille_Définie
retourne la taille définie du champ.
Objet_Field.Name = Nom
retourne le nom d'un champ.
Objet_Field.NumericScale = Echelle
indique par une valeur octale le nombre de places décimales auxquelles des valeurs numériques seront séparées.
Objet_Field.OriginalValue = Valeur_Originale
indique la valeur d'un champ qui a existé dans l'enregistrement avant que n'importe quels changements n'aient été accomplis.
Objet_Field.Precision = Précision
indique par une valeur octale, le nombre maximal de chiffres utilisé pour représenter des valeurs.
Objet_Field.Status = FieldStatusEnum
indique le statut de l'enregistrement en cours.
Objet_Field.Type = DataTypeEnum
indique un type de données DataTypeEnum.
Objet_Field.UnderlyingValue = Valeur_Courante
indique la valeur courante de l'objet Field de la base de données.
Objet_Field.Value = Valeur
retourne la valeur du champ en cours.
Les Méthodes
Méthode
Description
Objet_Field.AppendChunk Données
ajoute des données à un grand texte ou un champ de données binaire.
Variable = Objet_Field.GetChunk(Taille)
retourne tout ou une portion des contenus d'un grand texte ou un objet Field de données binaires.
Exemple [voir] 
<html>
 <body>
 <%
     Dim Obj_Recordset, Objet_Field
     Set Obj_Recordset = Server.CreateObject("ADODB.Recordset")
     obj_Recordset.Open "Select * from Fiche","DSN=personnel"
     With Obj_Recordset
       Compteur = .Fields.Count - 1
 %>
 <table border="1" cellpadding="3" align="center">
     <tr>
       <th>Nom</th>
       <th>Valeur</th>
       <th>Taille actuelle</th>
       <th>Taille définie</th>
       <th>Type</th>
     </tr>
       <th> </th>
       <th>Echelle num</th>
       <th>Précision</th>
       <th>Attribut</th>
       <th>Statut</th>
     </tr>
     <%
       Dim i
       Do While Not .EOF
         For i = 0 To Compteur
           For Each Objet_Field In .Fields
             Response.Write "<tr><th><i>" & Objet_Field.Name & "</i></th>"
             Response.Write "<td>" & Objet_Field.Value & "</td>"
             Response.Write "<td>" & Objet_Field.ActualSize & "</td>"
             Response.Write "<td>" & Objet_Field.DefinedSize & "</td>"
             Response.Write "<td>" & Objet_Field.Type & "</td></tr>"
             Response.Write "<tr><td> </td>"
             Response.Write "<td>" & Objet_Field.NumericScale & "</td>"
             Response.Write "<td>" & Objet_Field.Precision & "</td>"
             Response.Write "<td>" & Objet_Field.Attributes & "</td>"
             Response.Write "<td>" & Objet_Field.Status & "</td></tr>"
           Next
         Next
         .MoveNext
       Loop
       .Close
       End With
       Set obj_Recordset = Nothing
     %>
   </tr>
 </table>
 </body>
</html>