以下是我的程序,测试发现当我的记录数100多条时,会出现“行数不可用!-1“的情况,但当记录为70条至2条时,xlsRowNum有正确的行数,大家帮帮忙,这是为什么?是数据库问题还是我的程序问题,难道要我自己放着RowCount属性不用自己写个行数算法么?
    ……
    Set Rs = cn.OpenResultset(sql_str, 1, 4, 64)  'sql_str为查询语句,肯定有对应记录
    If Rs.EOF Then
        MsgBox "没有查询到满足的数据!", vbCritical + vbOKOnly, "系统提示"
        Exit Sub
    End If
    With Rs
    .MoveLast
    xlsRowNum = .RowCount '记录总数
    Debug.Print .RowCount
    If xlsRowNum < 1 Then
        MsgBox "行数不可用!" & xlsRowNum, vbCritical + vbOKOnly, "系统提示"
        Exit Sub
    End If
    ……