以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  BeforeLoadOuterTable  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=121489)

--  作者:yetle
--  发布时间:2018/7/7 11:56:00
--  BeforeLoadOuterTable
报价单和报价明细都是外部数据表
If e.DataTableName = "报价单" Then
    Dim StartDate As Date = Date.Today().AddDays(-10)
    e.SelectString = "Select * F rom {报价单} Where [业务部_申请日期] > #" & StartDate & "#"
End If


If e.DataTableName = "报价申请" Then
Dim StartDate As Date = Date.Today().AddDays(-10)
e.SelectString = "Select * F rom {报价明细} Where [日期] > #" & StartDate & "#"
End If

错误提示:
图片点击可在新窗口打开查看此主题相关图片如下:111.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2018/7/7 14:04:00
--  
如果是sqlserver数据库,#号改为单引号
--  作者:yetle
--  发布时间:2018/7/7 14:30:00
--  
还是同样报错

If e.DataTableName = "报价单" Then
    Dim StartDate As Date = Date.Today().AddDays(-10)
    e.SelectString = "Select * F rom {报价单} Where [业务部_申请日期] > \'" & StartDate & "\'"
End If


If e.DataTableName = "报价申请" Then
Dim StartDate As Date = Date.Today().AddDays(-10)
e.SelectString = "Select * F rom {报价明细} Where [日期] > \'" & StartDate & "\'"
End If
[此贴子已经被作者于2018/7/7 14:30:59编辑过]

--  作者:有点蓝
--  发布时间:2018/7/7 15:28:00
--  
还是同样的错误?

msgbox("Select * F rom {报价单} Where [业务部_申请日期] > \'" & StartDate & "\'") 显示什么内容

--  作者:yetle
--  发布时间:2018/7/7 16:32:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:111.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2018/7/7 17:17:00
--  
F rom - -中间空格去掉啊
--  作者:yetle
--  发布时间:2018/7/7 17:40:00
--  
去掉了的
--  作者:有点蓝
--  发布时间:2018/7/9 8:49:00
--  
提示什么错误?
--  作者:yetle
--  发布时间:2018/7/9 9:33:00
--  
错误提示是一样的
--  作者:有点蓝
--  发布时间:2018/7/9 9:37:00
--  
还提示#号的错误?删除项目里的bin目录,重启项目试试