Valeurs de la propriété type de l'objet field [Résolu]

Signaler
Messages postés
79
Date d'inscription
mercredi 14 avril 2010
Statut
Membre
Dernière intervention
2 août 2014
-
Messages postés
14788
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 mai 2021
-
Bonjour,

Je cherche à construire une table qui me serve de "datawarehouse".
J'arrive à récupérer presque tout ce que je souhaite, sauf le type "en clair" du champ (integer, long, date, ...)
Je récupère une valeur numérique, mais pas ce qu'elle représente. Avez-vous une solution ?

Voici mon code :

For Each dbtdef In dbdwh.TableDefs
For Each dbfield In dbtdef.Fields
If Left(dbtdef.Name, 4) <> "Msys" Then
rstable.AddNew
rstable("dwhchp") = dbfield.Name
rstable("dwhtab") = dbfield.SourceTable
rstable("dwhdes") = dwh_fnomchamp(dbtdef, dbfield)
rstable("dwhtyp") = dbfield.Type
rstable("dwhord") = dbfield.OrdinalPosition
rstable("dwhsz1") = dbfield.Size
rstable("dwhnul") = dbfield.Required
rstable("dwhvid") = dbfield.AllowZeroLength
rstable.Update
'MsgBox "attributes " & dbfield.Attributes
End If
'If dbtdef.Name <> "DWHTAB" Then
'MsgBox ("champ " & dwh_fnomchamp(dbtdef, dbfield))
'End If
Next dbfield
Next dbtdef



Damedom Sologne

3 réponses

Messages postés
14788
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 mai 2021
155
Bonjour,

Dsl, je voulais dire Explorateur d'objet (F2).

C'est dans l'énumération DataTypeEnum.

adDate, adDouble, ...

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site
Messages postés
14788
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 mai 2021
155
Bonjour,

Tu peux regarder dans l'explorateur de solution, je crois que ça correspond aux nom : adLong, adString, ...

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---
Mon site
Messages postés
79
Date d'inscription
mercredi 14 avril 2010
Statut
Membre
Dernière intervention
2 août 2014

Euh
Explorateur de solutions ????


L'aide Access ne connaît ni adlong, ni adstring.
Est-ce une partie de votre site et, si oui, comment y accéder ?
le code 8 semble correspondre à une date
le code 10 à du texte
le code 4 à un entier ....
mais comment être sûre ?


Damedom Sologne