Foxtable(狐表)用户栏目专家坐堂 → 请专家帮忙指点进出库中的出库方法,谢谢


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

主题:请专家帮忙指点进出库中的出库方法,谢谢

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/17 22:29:00 [只看该作者]

.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2019.8.3.1
错误所在事件:表,入库,DataColChanged
详细错误信息:
调用的目标发生了异常。
无法找到列 日期 >= #2019-08-17# and 日期 < #2019-08-18#。


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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/17 22:31:00 [只看该作者]

2019-08-17 22:24:40  这是日期列的值,出现了上楼错误,请帮忙指点,谢谢。



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


加好友 发短信
等级:超级版主 帖子:105948 积分:538809 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/18 20:15:00 [只看该作者]

完整代码给出来看看

加上空格试试
Dim drs As List(Of DataRow) = DataTables("入库").Select("[ 品名] = " & e.newvalue,"日期 >= #" & date.today % "# and 日期 < #" & date.today.adddays(1) & "#")
[此贴子已经被作者于2019/8/18 20:15:56编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/18 23:49:00 [只看该作者]

老师:加上空格还是同样的错误提示,另外,我把%改成了&,请问对不对?谢谢。

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/18 23:50:00 [只看该作者]

在DATACOLCHANGED中就这一句代码。

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


加好友 发短信
等级:超级版主 帖子:105948 积分:538809 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/19 9:01:00 [只看该作者]

Dim drs As List(Of DataRow) = DataTables("入库").Select("[ 品名] = " & e.newvalue,"日期 >= #" & date.today "# and 日期 < #" & date.today.adddays(1) & "#")

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/19 16:15:00 [只看该作者]

老师:还是提醒有错误

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


加好友 发短信
等级:超级版主 帖子:105948 积分:538809 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/19 16:52:00 [只看该作者]

Dim drs As List(Of DataRow) = DataTables("入库").Select("[ 品名] = '" & e.newvalue & "' and 日期 >= #" & date.today & "# and 日期 < #" & date.today.adddays(1) & "#")

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/28 23:09:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:进出库.rar

请老师帮忙检查指点一下出库窗口中的出库按钮代码。出库不成功却提示出库成功。谢谢!!!


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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/28 23:11:00 [只看该作者]

就是对老师13楼的代码调整后出现问题。谢谢

 回到顶部
总数 54 上一页 1 2 3 4 5 6 下一页