以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]读取mdb文件  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=172372)

--  作者:OKK
--  发布时间:2021/10/9 14:45:00
--  [求助]读取mdb文件
设置了外部数据源连接mdb文件,因数据比较多,所以在打开项目后,设置了所有表都只加载20行,但使用代码读取还没加载的行时,无法读取,代码如下:
Dim ka As DataRow = DataTables("用户表").find("编号 = \'21\'")
If ka IsNot Nothing Then
messagebox.show(3)
End If


请问,要怎么才能读取未加载的行?







--  作者:有点蓝
--  发布时间:2021/10/9 14:48:00
--  
Dim ka As DataRow = DataTables("用户表").sqlfind("编号 = \'21\'")


--  作者:jialihaha
--  发布时间:2021/10/9 14:48:00
--  
SQLFind
--  作者:OKK
--  发布时间:2021/10/9 14:51:00
--  
测试了,不行,外部数据源不是连接SQL数据库,是access数据库
--  作者:有点蓝
--  发布时间:2021/10/9 15:06:00
--  
不管什么数据库,肯定可以。如果查询不到,就是不存在21编号的数据,或者没有保存
--  作者:OKK
--  发布时间:2021/10/9 15:32:00
--  



帮我看一下,打开项目后,在命令窗口输入以下代码,没反应。。。。

Dim ka As DataRow = DataTables("表A").SQLfind("编号 = \'21\'")
If ka IsNot Nothing Then
messagebox.show(3)
End If
[此贴子已经被作者于2021/10/14 20:23:45编辑过]

--  作者:有点蓝
--  发布时间:2021/10/9 15:43:00
--  
首先编号是表达式列,不存在与数据库。如果要查询数据库改为这样

Dim ka As DataRow = DataTables("表A").SQLfind("[_Identify] = 21")
If ka IsNot Nothing Then
    messagebox.show(3)
End If


表达式中的日期用符号#括起来,数值则不需要任何符号括起来,这些和代码中的格式是一样的,唯一不同的是字符串用单引号括起来。

例如:

Tables("订单").Filter = "[产品] = \'PD01\'"  \'字符用单引号括起来
Tables("订单").Filter = "[日期] = #3/17/1999#"  \'日期用#括起来
Tables("订单").Filter = "[折扣] = 0.1"  \'数值直接使用


--  作者:OKK
--  发布时间:2021/10/9 16:38:00
--  
哦,我再认真看看,谢谢了!图片点击可在新窗口打开查看