Valeurs de la propriété type de l'objet field

Résolu
damedom41 Messages postés 79 Date d'inscription mercredi 14 avril 2010 Statut Membre Dernière intervention 2 août 2014 - 14 juil. 2012 à 17:30
NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 - 14 juil. 2012 à 18:32
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

NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 159
14 juil. 2012 à 18:32
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
3
NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 159
14 juil. 2012 à 17:50
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
0
damedom41 Messages postés 79 Date d'inscription mercredi 14 avril 2010 Statut Membre Dernière intervention 2 août 2014
14 juil. 2012 à 18:25
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
0
Rejoignez-nous