Le portail francophone de la géomatique

Bonjour à tous,

J'aimerais cérer un dialogue ou l'on doit ouvrir une table via un bouton (pas de problème ici)
En cliquant sur le bouton, l'utilisateur doit choisir une table sur son disque dure (pas de problème ici)
Quand la table est choisi, un edit text est alteré (alter control) pour avoir le "chemin" de la table (pas de problème ici)

J'aimerais finalement qu'un listbox s'altere pour ajouter la liste des champ de la table pas de problème pour alterer le list box mais c'est plutot pour avoir le nom des champs. Voici mon code, les ??? sont les infos qui me manque, enfin je crois

Control ListBox
position 220, 160
height = 100
width = 80

Dim i_numcols As SmallInt
dim i as smallint
dim a_list as string

i_numcols = TableInfo("world", TAB_INFO_NCOLS)

if i_numcols=0 then exit sub 
end if

for i=1 to i_numcols
a_list=a_list+???+";"
next
a_list=left$(a_list, len(a_list)-1)

Title a_list

Merci
JF

Dernière modification par jean94 (Fri 07 May 2010 21:56)