首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

新手

2012-04-27 
新手求助test01 select bmb01 主料,bmb03 原料, ,bmb06/bmb07 用量 from bmb_file wherebmb01 &

新手求助
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.Count

test01的2个sql,第一个和第二个的区别就是在原料后面多了个空格,但是第二句就有问题了,报实时错误 '7004' 行集合不能作为标签的错误。

  但是这2句sql都没有问题,都可以单独执行。
  请教各位是什么问题呢?

[解决办法]
cn或rs要使用客户端游标。
.
.
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

热点排行