leggere campi di una tabella

[g.scardigno]

Voglio caricare una combo con i campi di una tabella....
Come posso fare???

Grazie per i suggerimenti...

[xegallo]

2 sistemi
1)
semplice query col creator di sistema della tabella tables

esempio db2
select tablename from sysibm.tables
2) usando l'ggetto schema di ado

[g.scardigno]

forse non mi sono spiegato voglio leggere la struttura della tabella

esempio tabella :impianti(id_cliente,id_impianto,denominazione)

io voglio leggere proprio:
id_cliente
id_impianto
denominazione

e non il loro contenuto!!!!

Grazie...

[xegallo]

e io proprio quello ti ho spiegato

[g.scardigno]

scusa la mia ignoranza....


il db si chiama :
GestVer_vero.mdb

la tabella che si chiama:
impianti

le colonne sono:
id_cliente
id_impianto
denominazione

Quindi la select sarà:

select impianti GestVer_vero.impianti

oppure
select tablename GestVer_vero.impianti

:master: :master:

Grazie per l'aiuto....

[xegallo]

Private Sub Form_Load()
Dim cn As New ADODB.Connection
Dim rs As ADODB.Recordset
Dim i As Integer
Const dbpath = "c:\programmi\microsoft visual studio\vb98\biblio.mdb"
    
    cn.ConnectionString = "provider = Microsoft.jet.oledb.4.0 ; data source = " & dbpath
    cn.Open
    Set rs = cn.OpenSchema(adSchemaColumns)
        Do Until rs.EOF
            For i = 0 To rs.Fields.Count - 1
                Debug.Print rs.Fields(i).Name & " = " & rs.Fields(i).Value
            Next i
            rs.MoveNext
        Loop
    rs.Close
    Set rs = Nothing
    cn.Close
    Set cn = Nothing
End Sub

dentro rs hai tuttele info che ti servono

[g.scardigno]

Ok funziona .....

Ma per avere solo le colonne di una determinata tabella????

grazie ancora...

[xegallo]

Originariamente inviato da g.scardigno
Ok funziona .....

Ma per avere solo le colonne di una determinata tabella????

grazie ancora...

i nomi dei campi ora li sai
è un recordset usa la proprietà filter sul campo del nome tabella

[g.scardigno]

non riesco ad applicare il filter....

vorrei selezionare solo i record che contengono come nome tabella: impianti...
ho provato con:

dsTemp.Filter = "TABLE_NAME=impianti"

ma ottengo un errore....

[g.scardigno]

ci sono riuscito.......

con:

dsTemp.Filter = dsTemp.Fields(2).Name & "='impianti'"