列名の取得方法は？

質問

VB6.0 ORACLE10g Win20003Server WinXP開発
よろしくお願いします。
列名(フィールド名称)を取得する方法(SQL)がありましたら、お願いします。
データの内容はわかるんですが、列名(どの列に入っているのか)を知りたいと思っています。
よろしくお願いします。

回答No.1

chibita_papa · ベストアンサー

Sub Main()

Dim f As Field

conn.Open connstr

strSQL = "Select Top 1 * From Table "
rs.Open strSQL, conn

For Each f In rs.Fields
Debug.Print f.Name, f.Type
Next f

rs.Close

conn.Close
Set rs = Nothing
Set conn = Nothing

End Sub

で、ＯＫです

お礼

早速回答ありがとうございます。
実際に実行してみましたが、エラーが出てしまいます。
「Fromキーワードが指定の場所にありません。」
でした、よく調べてみると、TOP句はオラクルは対応していないようです。

回答No.2

chibita_papa

strSQL = "Select * From Table "
でも構いません。

少しでも抽出レコードが少ないほうが良いと思い
TOP 1　としただけですので。

お礼

ありがとうございます。
列名が取れました。