レコード数のカウント

投稿者	投稿内容
未記入会議室デビュー日: 2008/05/23 投稿数: 1	投稿日時: 2008-05-23 17:21 下記のように記述しましたが、 RecordCountが「-1」と表示されてしまい、正しいレコード数を取得できません。教えてください。 Dim oConn As ADODB.Connection Dim oRec As ADODB.Recordset Dim lRecordCount As Integer lRecordCount = 0 oConn = New ADODB.Connection oConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\hanbaikanri_A\data\database.mdb") oRec = oConn.Execute("SELECT * FROM T_得意先マスタ") lRecordCount = oRec.RecordCount Me.管理番号.Text = lRecordCount
七味唐辛子ぬし会議室デビュー日: 2001/12/25 投稿数: 660	投稿日時: 2008-05-23 18:09 select count(*) from T_得意先マスタなんじゃないの
platini 大ベテラン会議室デビュー日: 2002/12/03 投稿数: 193	投稿日時: 2008-05-23 18:54 http://support.microsoft.com/kb/194973/ja まぁ要するにRecordsetを開くとき工夫しないと、 -1が常に返ってくる仕様なわけですわ。

投稿者	投稿内容
未記入会議室デビュー日: 2008/05/23 投稿数: 1	投稿日時: 2008-05-23 17:21 下記のように記述しましたが、 RecordCountが「-1」と表示されてしまい、正しいレコード数を取得できません。教えてください。 Dim oConn As ADODB.Connection Dim oRec As ADODB.Recordset Dim lRecordCount As Integer lRecordCount = 0 oConn = New ADODB.Connection oConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\hanbaikanri_A\data\database.mdb") oRec = oConn.Execute("SELECT * FROM T_得意先マスタ") lRecordCount = oRec.RecordCount Me.管理番号.Text = lRecordCount
七味唐辛子ぬし会議室デビュー日: 2001/12/25 投稿数: 660	投稿日時: 2008-05-23 18:09 select count(*) from T_得意先マスタなんじゃないの
platini 大ベテラン会議室デビュー日: 2002/12/03 投稿数: 193	投稿日時: 2008-05-23 18:54 http://support.microsoft.com/kb/194973/ja まぁ要するにRecordsetを開くとき工夫しないと、 -1が常に返ってくる仕様なわけですわ。