damedom41
Messages postés78Date d'inscriptionmercredi 14 avril 2010StatutMembreDernière intervention 2 août 2014
-
14 juil. 2012 à 17:30
NHenry
Messages postés15156Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention29 septembre 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
NHenry
Messages postés15156Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention29 septembre 2024159 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
NHenry
Messages postés15156Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention29 septembre 2024159 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
damedom41
Messages postés78Date d'inscriptionmercredi 14 avril 2010StatutMembreDerniè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 ?