ADO. RecordCountが取れないとき

現象：クラシックASPでADOのレコードセットのRecordCountを取得できない

問題箇所

Set objSetA = Server.CreateObject("ADODB.Recordset")
objSetA.PageSize = ComPageCnt
objSetA.Open strSQL, objCon, adOpenKeySet, adLockReadOnly

１．Open の時の引数
第三引数でadOpenKeySet（１）か

２．PageSize
これを指定するととれるようになった