Foxtable(狐表)用户栏目专家坐堂 → [求助]刚才发的忘记图片了,大家再帮我看看吧


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

主题:[求助]刚才发的忘记图片了,大家再帮我看看吧

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
[求助]刚才发的忘记图片了,大家再帮我看看吧  发帖心情 Post By:2014/5/7 14:11:00 [显示全部帖子]

各位老师中午好,不好意思我又来了
现在我要单独做一个查询窗口(档案明细查询),因为我刚开始启动这个窗口的时候不想让表加载数据,另外主窗口中又有关联表,因此没有将表绑定到明细表,而是将表定义为SQLQuery类型,并连接数据源。然后进行查询,通过查询将明细表中符合查询条件的数据在表中表示出来。以下是查询按钮的代码:
Dim filter As String
Dim dtp1 As WinForm.DateTimePicker
Dim dtp2 As WinForm.DateTimePicker
Dim cmb As WinForm.ComboBox
dtp1 = e.Form. Controls("起始日期").text
dtp2 = e.Form. Controls("结束日期").text
cmb = e.Form. Controls("档案类型").text
If dtp1 Is Nothing
    Messagebox.show("请输入起始日期!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else If dtp2 Is Nothing
    Messagebox.show("请输入结束日期!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else If cmb Is Nothing
    Messagebox.show("请输入档案类型!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
DataTables("档案明细查询_Table1").Fill("Select * From {档案管理明细} Where 归档日期 >= dtp1  And 归档日期 <= dtp2 And 档案类型 = cmb ","sqlserver",True)

请大家帮我看看哪地方有问题呀?
此主题相关图片如下:111.png
按此在新窗口浏览图片

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 14:26:00 [显示全部帖子]

当日期控件为空时我要做判断,如图dtp1 is nothing是不可以的(如图333),然后我又改成了 dtp1 =“”,当进行查询时又出现错误(图444)
如果先不做这些判断,又报Select语法或者数据源的问题(如图222)

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

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

图片点击可在新窗口打开查看此主题相关图片如下:222.png
图片点击可在新窗口打开查看
这么多问题,头都大了,帮主帮帮忙图片点击可在新窗口打开查看


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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 14:32:00 [显示全部帖子]

谢谢甜姐!
日期类型是没问题了,但是又报Select语法或者数据源的问题
我的设计:现在我要单独做一个查询窗口(档案明细查询),因为我刚开始启动这个窗口的时候不想让表加载数据,另外主窗口中又有关联表,因此没有将表绑定到明细表,而是将表定义为SQLQuery类型,并连接数据源。然后进行查询,通过查询将明细表中符合查询条件的数据在表中表示出来。
数据源应该没问题啊,我是从外部数据源那儿获得的数据源名称
请看图:
图片点击可在新窗口打开查看此主题相关图片如下:587.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 14:35:00 [显示全部帖子]

多谢Bin斑竹,关于Select语法或数据源的问题仍然存在,是怎么回事啊?

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 14:36:00 [显示全部帖子]

是SQLServer

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 14:44:00 [显示全部帖子]

应该怎么Show出来?是这样么?好像不对呀
messagebox.show(" Select * From {档案管理明细} Where 归档日期 >= #" & dtp1 & "#  And 归档日期 <= #" & dtp2 & "# And 档案类型 = '" & cmb & "' ")


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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 14:52:00 [显示全部帖子]

这几个值取得都没有问题啊!时间就是2012/12/12的格式,档案类型就是字符串。这样的话跟数据源有没有关系啊?
图片点击可在新窗口打开查看此主题相关图片如下:888.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 14:56:00 [显示全部帖子]

那样直接弹出
图片点击可在新窗口打开查看此主题相关图片如下:23454.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 15:08:00 [显示全部帖子]

您觉得我的设计有没有问题呢?
因为我刚开始启动这个窗口的时候不想让表加载数据,另外主窗口中又有关联表,因此没有将表绑定到明细表,而是将表定义为SQLQuery类型,并连接数据源。
这样的话Fill方法还能这么用吗?:datatables(档案明细查询_Table1)
我将它改为datatables("Table1“)也不正确

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/5/7 15:13:00 [显示全部帖子]

哎呀,我脑子糊涂了,改了,现在可以了。
万分感谢Bin斑竹图片点击可在新窗口打开查看

 回到顶部
总数 12 1 2 下一页