Selectionner la colonne numéro 2, 4, 6 sur ACCESS

Question

Je vous explique mon probl&#232;me,



J'importe des donn&#233;es d'un fichier CSV vers une base de donn&#233;es. Selon
que le fichier CSV contient des En-t&#234;tes ou non la table cr&#233;ee
contiendra comme nom de colonne :



    * Champ1, Champ2, Champ3 .... si le fichier ne contient pas d'en t&#234;te



    * Soit le nom des En-t&#234;tes si le fichier en contient



Dans tous les cas je voudrais selectionner la colonne num&#233;ro 2 qui s'appelle dans un cas "Champ2" et dans l'autre "Nom". 



Aidez moi s'il vous plait :)

acecel · Answer

Si tu utilise des recordset 
il te suffit de faire par exemple :

Recordset(1).Value = Valeu_Pour_Le_Champ1

Dzvirfein · Answer

Je me suis mal exprim&#233;.



J'arrive bien a cr&#233;er la table mais dans ma requete SELECT apres je
voudrais non pas qu'il selectionne tous les champs et apres faire
RecordSet(1).value mais je voudrias qu'il ne selectionner que la
colonne 2



En gros un truc qui serait 



Select Col2 

From Ma_Table



Ce qui n'est pas possible vu que je ne connais pas le nom de mes colonnes qui sont diff&#233;rent selon les imports

acecel · Answer

Essaye quelque chose du genre :

    
    Dim xTableDef As TableDef
    Dim xBase As Database
    Dim xRecordset As Recordset
    Set xBase = OpenDatabase(MaBase)
    
    
    Set xTableDef = xBase.QueryDefs("MaTable")
    Set xrec1 = xBase.OpenRecordSet("Select " & xTableDef.Fields(1).Name & " from MaTable")

acecel · Answer

Essaye quelque chose du genre :

(En plus propre  )

Dim xTable As TableDef
Dim xBase As Database
Dim xRecordset As Recordset
Set xBase = OpenDatabase(MaBase)
    
    
Set xTable= xBase.QueryDefs("MaTable")
Set xRecordset = xBase.OpenRecordSet("Select " & xTable.Fields(1).Name & " from MaTable")

yuri1961 · Answer

Salut!

Il est assez simple

SELECT * FROM TaTable

Recordset.Fileds(1).Value = Valeu_Pour_Le_Champ2

Recordset.Fileds(3).Value = Valeu_Pour_Le_Champ4

Recordset.Fileds(5).Value = Valeu_Pour_Le_Champ6

Selectionner la colonne numéro 2, 4, 6 sur ACCESS

5 réponses

Discussions similaires