怎么获得ADO查询结果的记录集总共有几条记录??? 怎么用RecordCount老返回-1啊,是不是我的函数用错了??? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用这个看看dim rs as adodb.recordsetset rs=XXX.conn.execute(sql)data=rs.recordcount 楼主用的是不是以下的方法? Dim Cm As New ADODB.Command Dim Rst As New ADODB.Recordset Dim Cn As New ADODB.Connection Cn.CursorLocation = adUseClient '一定不能少了这一行 Cm.ActiveConnection = Cn Cm.CommandText = sql Set Rst = Cm.Execute movelast以后得到的结果就正确了 SQL 如何合并两个表? 请教一个数据库乱码问题! 用VB做的云台控制程序 用连接串连接比较快,是不是用udl文件连接就比较慢呀? 如何取得ACCESS特定表的信息 注册OCX控件的过程到底是个怎样的过程? 如何平滑拖动picutre控件 问一个VB简单问题 我用commondialog控件 打开文件时,怎么只显示没有后缀名的文件 谢谢 ●●●为何下载的源码不能运行?●●● shelliconcache!!! 如何在程序中设定打印的纸张的大小? On Error Goto 难道有次数限制?
dim rs as adodb.recordset
set rs=XXX.conn.execute(sql)
data=rs.recordcount
Dim Rst As New ADODB.Recordset
Dim Cn As New ADODB.Connection
Cn.CursorLocation = adUseClient '一定不能少了这一行
Cm.ActiveConnection = Cn
Cm.CommandText = sql
Set Rst = Cm.Execute