test01 = "select bmb01 主料,bmb03 原料,' ',bmb06/bmb07 用量 from bmb_file where bmb01 = " & "'" & ima011.Text & "'" '有问题
'test01 = "select bmb01 主料,bmb03 原料,bmb06/bmb07 用量 from bmb_file where bmb01 = " & "'" & ima011.Text & "'" '没问题 Set rs = New ADODB.Recordset
rs.Open test01, cn, adOpenKeyset, adLockOptimistic
Set bmb.DataSource = rs
bmb.Refresh
l_cn2 = bmb.Columns.Counttest01的2个sql,第一个和第二个的区别就是在原料后面多了个空格,但是第二句就有问题了,报实时错误 '7004' 行集合不能作为标签的错误。 但是这2句sql都没有问题,都可以单独执行。
请教各位是什么问题呢?
'test01 = "select bmb01 主料,bmb03 原料,bmb06/bmb07 用量 from bmb_file where bmb01 = " & "'" & ima011.Text & "'" '没问题 Set rs = New ADODB.Recordset
rs.Open test01, cn, adOpenKeyset, adLockOptimistic
Set bmb.DataSource = rs
bmb.Refresh
l_cn2 = bmb.Columns.Counttest01的2个sql,第一个和第二个的区别就是在原料后面多了个空格,但是第二句就有问题了,报实时错误 '7004' 行集合不能作为标签的错误。 但是这2句sql都没有问题,都可以单独执行。
请教各位是什么问题呢?
.
.
cn.CursorLocation = adUseClient
cn.open
或
.
.
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open test01, cn, adOpenKeyset, adLockOptimistic
Set bmb.DataSource = rs
bmb.Refresh
l_cn2 = bmb.Columns.Count