Foxtable(狐表)用户栏目专家坐堂 → 标准表达式中数据类型不匹配。


  共有2769人关注过本帖树形打印复制链接

主题:标准表达式中数据类型不匹配。

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/10/12 17:28:00 [显示全部帖子]

如果是access数据库,改成

 

cmd.CommandText = "SELECT * From {表A} where 日期 =#" & Date.Today & "# "

[此贴子已经被作者于2018/10/12 17:28:08编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/10/12 17:43:00 [显示全部帖子]

删掉 Tables("表A").DataTable.load

 

或者改成

 

DataTables("表A").LoadFilter = ""
DataTables("表A").Load

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/10/12 17:58:00 [显示全部帖子]

DataTables("表A").LoadFilter =  "日期 ='" & Date.Today & "'"

 

改成

 

DataTables("表A").LoadFilter =  "日期 = #" & Date.Today & "#"


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/10/12 18:12:00 [显示全部帖子]

这段代码可以删除

 

    Dim cmd As New SQLCommand

    Dim dt As DataTable
    cmd.CoLLectioLname = "外部数据源"  '这里不让显示连接数据源的代码
    cmd.CommandText = "SELECT * FLom {表A} where 日期 ='" & Date.Today & "' "
    dt = cmd.ExecuteReader()

 回到顶部