select count(*)で得られたレコード総数を取得し変数に格納するには？？

解決

coffee 2003-05-02 16:17:42 No: 77850 IP: [192.*.*.*]

いつもお世話になってます。
データベース内のレコード数を表示させたいのですが、
select count(*)で得られたレコード総数を変数に格納するにはどうしたらいいのでしょうか？
気分よくGWに入りたいので、よろしくお願いします。

とろ 2003-05-02 16:40:34 No: 77851 IP: [192.*.*.*]

なにが分からないのかアレですが。

データベースは何ですか？（ Access, SQL Server, Text, Excel ???）
DAO や ADO, RDO のいずれかの使い方はご存知ですか？

seraph 2003-05-02 18:40:11 No: 77852 IP: [192.*.*.*]

気分よくＧＷに突入していただきましょう
＃大サービスです

例1)Fields()メソッドを使う(ADODBでの例)
  Dim rs As ADODB.Recordset         'レコードセットオブジェクト
  Dim sSql$, nRecCnt&

  sSql$ = "SELECT COUNT(*) FROM table"     '*1
  rs.Open sSql$, connection
  nRecCnt& = rs.Fields(0)
             ^^^^^^^^^^^^
例2)SQLでフィールド名をつけておく
    例1の*1を以下のようにする

  sSql$ = "SELECT COUNT(*) AS REC_CNT FROM table"
                           ^^^^^^^^^^
  こうすれば
  nRecCnt& = rs!REC_CNT
  のように出来ます (多分(^^;)。

編集削除

coffee 2003-05-06 14:42:47 No: 77853 IP: [192.*.*.*]

＞とろさん
データベースはOracleです。

遅くなりましたが、
SQL = "select count(*) from table"
Set oraDs = oraDB.CreateDynaset(strSQL, 0)
変数 = oraDs.Fields("count(*)")
で解決できました。
とろさん、seraphさん、ありがとうございます。
GW、満喫できました♪

編集削除