in vb6?
Fai una select Top 0 * from nometabella
e poi hai i campi in rs.Fields(idx).Name