送分的问题，快来抢啊！（rst.recordcount）

rwj81 2003-09-10 04:23:57

我的ASP代码如下：
set rst_view = Server.CreateObject("ADODB.Recordset")
rst_view.ActiveConnection = MM_cnn_incoming_STRING
sqlstr=session("sqlstr")
rst_view.Source = sqlstr
rst_view.CursorType = 0
rst_view.CursorLocation = 2
rst_view.LockType = 3
rst_view.pagesize=8
rst_view.Open()

totalmessage=rst_view.recordcount
totalpage=rst_view.pagecoun

记录集绝对打开了，并且有记录，但rst_view.recordcount和rst_view.pagecoun
的值却始终是-1，何解？？？

...全文

34 3 打赏收藏转发到动态举报

写回复

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

huhan3 2003-09-10

打赏
举报

回复

rst_view.CursorType = 3

gshope 2003-09-10

打赏
举报

回复

rst_view.CursorType = 3
rst_view.LockType = 1

peytonzwt 2003-09-10

打赏
举报

回复

我也遇到这个问题了，是数据库的问题啊，数据库不支持。

If rst.recordcount > 0 Then '如果存在记录 sys_borrowlimit = rst.fields("借书时限") sys_continuelimit = rst.fields("续借时限") sys_maxborrow = rst.fields("最大借书量") sys_maxpenalty = rst.fields("最高...

If rst1.RecordCount > 0 Then frmMsg.Show frmMsg.notice.Visible = True frmMsg.Text1.Text = "此书号已经存在!" rst.Cancel Command2.Enabled = True Command3.Enabled = True Command4.Enabled = True ...

If rst.RecordCount <> 0 Then DBExist = rst.RecordCount Else DBExist = 0 End If con.Close End Function Public Function txtIsNull(txt As TextBox) As Boolean If Trim(txt.Text) = "" Then ...

If (execl_rst.RecordCount) Then If (Option1.Value) Then If (execl_rst.Fields.Count = 8) Then Set rst = yg_gain_table_recordset("yg_device") execl_rst.MoveFirst Do While (Not execl_rst.EOF) rst....

If rst.RecordCount > 0 Then begin rst.last; zuixingqi:=rst.Fields[0].Value; end; end; ``` **知识点说明：** - **TADODataSet**: 创建 ADO 数据集对象。 - **commandtype**: 指定命令类型为文本命令。 - ...

28,409

社区成员

356,971

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章