[RISOLTO] Come ricevere i NOMI dei campi in una Tabella

[jockerfox]

Salve a tutti.
DOMANDA: data una Tabella, come posso avere una lista dei NOMI dei campi? (ripeto: la lista dei campi di come è strutturata la tabella!).

Leggendo i DOC su Table, che riporto per completezza:

Table.Fields (gb.db)
Property Read Fields As .Table.Fields
Returns a collection of the fields of the table.

[/i]

In teoria dovrei fare semplicemente:

Codice: [Seleziona]

Dim hTable As Table
...
Print "Fields:" & hTable.Fields

Ma naturalmente non funge, perché non riesco a collegare hTable con la Connessione!

Un aiutino.. please.

[milio]

Dim c As Connection
Dim t As Table
Dim f As Field

  c.Type = "mysql"
  c.Password = "qualcosa"
  c.User = "qualcos'altro"
  c.Open()

  For Each t In c.Tables
    For Each f In t.Fields
      Print f.Name
    Next
  Next

[jockerfox]

Grazie Millo per la risposta.
La tua va bene, ma è preferibile la seguente: LINK

Poi io la ho modificata come segue:

Codice: gambas [Seleziona]

hres = ConnessioneDB.Find(sTabella, sRequest) 'Preleviamo tutti i records

For Each hres.Fields 'Per ogni campo..
  sCampi.Add(hres.Fields[i].name) '..memorizza il suo Nome
  Inc i 'Prossimo Campo
Next

ed in sCampi avremo un array dei soli Campi (o meglio, i NOMI dei campi).

Grazie a tutti: efficienti come sempre!

[milio]

DOMANDA: data una Tabella, come posso avere una lista dei NOMI dei campi? (ripeto: la lista dei campi di come è strutturata la tabella!).

Grazie Millo per la risposta.
La tua va bene, ma è preferibile la seguente: LINK

Poi io la ho modificata come segue...

  : "DOMANDA: dato un Result, come posso avere una lista dei NOMI dei campi? (ripeto: la lista dei campi di come è strutturato il Result!)."

    

[jockerfox]