Dim rs As New ADODB.Recordset
来源:百度知道 编辑:UC知道 时间:2024/05/08 01:54:29
如下代码报错,"没有为命令对象设置命令",怎么回事,应该怎样改?
Dim rs As New ADODB.Recordset
Dim sqlstr As String
With rs
.ActiveConnection = dbcnn
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.Source = sqlstr
.Open
Set Me.DataGrid1.DataSource = rs
.Close
End With
赋值了,是几个if 语句,我做的是条件查询
Dim rs As New ADODB.Recordset
Dim sqlstr As String
With rs
.ActiveConnection = dbcnn
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.Source = sqlstr
.Open
Set Me.DataGrid1.DataSource = rs
.Close
End With
赋值了,是几个if 语句,我做的是条件查询
贴出sqlstr赋值的语句。
----------------------
.Source = sqlstr
这行有问题
从代码看,你只声明了sqlstr变量,但并没有为变量赋值
sqlstr变量的内容应该是一个有效的SQL查询。
比如
SqlStr="select * from sysobjects"
Dim rs As New ADODB.Recordset
Dim adorecordset As New ADODB.Recordset
用Dim as New生成label怎么绑定数据库呢
Dim a As Integer, b As Integer, c As Integer, aa As Integer, bb As Integer
Dim Aform As New Form1 NEW关键字有什么用,请举例说明,谢谢.
rs As New ADODB.Recordset 用户定义类型未定义
在VB中,"dim flogin as new frmlogin"是什么意思?
vb6的 Dim Cmmd As New ADODB.Command怎么不好用了
dim s as string
Dim hstr As String * 1