ADOのRecordCountプロパティ(Recordsetの件数を返す)って CursorTypeがadOpenForwardOnly(=0)だと、-1が返される(仕様)ので CursorTypeをadOpenStatic(=3)でRecordsetを取得する事。 strSQL = "select * from hoge;" Set cn = CreateObject("ADODB.Connectio…

SQLServer2k + フロントエンドAcc2kでちょっとしたdbアプリ(adp)作った時、 ストアドの戻り値を受け取るのに手間取ったのでメモっておく。 Dim cmd As New ADODB.Command Dim fm As Form Dim lngRtnCode As Long Set fm = Form_hoge With cmd Set .ActiveCon…