易截截图软件、单文件、免安装、纯绿色、仅160KB

VB+Access模糊查询like的问题,在线等

各位好!
  今天碰到一个奇怪的问题:
  我用Access 2003中的查询工具查询下面语句:
  select * from FileDetail where Receiver_no Like '*77*'
  能查到相关记录.记录有几条.
  但我通过VB代码如下:
  Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
str = "select * from FileDetail where Receiver_no Like '*77*'"
rs.Open str, cn, adOpenDynamic, adLockOptimistic, adCmdText
If rs.RecordCount > 0 Then  '这里的rs.recordcount=0,真是奇怪?
  Call FillGridRecord(rs)
End If
高手能否指点一下原因.本是一个简单的问题,把我搞糊涂了.
先执行一个rs.movelast,再检查rs.recordcount试试.
另外clientside cursor是只有static类型的。


VB code:

str = "select * from FileDetail where Receiver_no Like '77%'"



用 .eof and .bof 最好!
在ado中用recordcount会有很多问题!

用 .eof and .bof 最好!
在ado中用recordcount会有很多问题!


str = "select * from FileDetail where Receiver_no like '%77%'"

rs.CursorLocation = adUseClient

大部分人没注意到是access,就应用用"*"而不是"%"
{{


相关问答:

求教下VB如何给D3D游戏写屏 - VB / API

想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】,效果就像游戏平台中一样,我试过在一窗口中写入文字,然后一直让窗口强制最前,虽然能实现文字显示,但是文字会不断闪烁,而且有不确定BUG,通过论坛搜 ......

【急求】VB中使用WScript调用外部命令 - VB / 基础类

在下是vb的新手,想写段程序,在vb中,使用wscript调用一些外部的命令,但是程序执行一直有错误,请各位高手帮忙解答下,谢谢。
代码如下:
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

帮我改改这VB题 - VB / 基础类

帮我改改 我总觉得有问题
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......

vb超简单form.show的问题 - VB / 非技术类

为什么我用form.show和form.hide多次连接了两个窗口只能互换链接两次啊?
代码看看
照道理form.show 没次数限定的吧

我也快疯了。
楼主知道怎么发贴么?

引用
我也快疯了。
楼主知道怎么发贴么?
楼主也 ......

vb - VB / 基础类

在vb中如何读取Word内容(包含表格,图片,等)
竟然不是zero。

不知道怎么实现的不要说话

这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号