Foxtable(狐表)用户栏目专家坐堂 → [求助]


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

主题:[求助]

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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
[求助]  发帖心情 Post By:2014/11/11 20:19:00 [显示全部帖子]

明细表如下图


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

图片点击可在新窗口打开查看此主题相关图片如下:出库单位.jpg
图片点击可在新窗口打开查看

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

 

要求实现如下功能:

1:出库单位和供应商内容较多,且经常变更,想通过状态选择方式进行动态加载,请问如何书写代码;

2:运费价格想通过判断出库单位和入库单位自动录入,并可以通过状态选择方式进行控制;请问如何书写代码;

3:延迟时间=交piao日期-入库日期,求整数天数,请问如何书写代码;


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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 20:29:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:天顺物流企业管理系统.table


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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 20:30:00 [显示全部帖子]

谢谢田田老师,速度这么快


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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 20:40:00 [显示全部帖子]

增加了,也重新启动了,没有效果

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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 20:45:00 [显示全部帖子]

1、有效果了,又出现一个问题,出库里面也只有状态为选中的那个数据了,其他的不见了

2、运费价格没有自动填写进去

 

 


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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 20:52:00 [显示全部帖子]

现在明细里面只加载勾选的内容了,但是出库里面那么没有勾选的内容都不见了,如果需要选择的时候再重新增加吗

 


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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 20:53:00 [显示全部帖子]

延迟天数代码效果非常明显,谢谢田田老师

 


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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 20:58:00 [显示全部帖子]

If e.DataCol.Name = "出库单位" Orelse e.DataCol.Name = "供应商" Then
    Dim dr As DataRow
    Dim Filter As String
    Filter = "[出库单位] = '" & e.DataRow("出库单位") & "' And [供应商] = '" & e.DataRow("供应商") & "'"
    dr = DataTables("出库").Find(Filter) '在出库表查找所输入出库单位供应商的行
End If

<!--EndFragment-->

[此贴子已经被作者于2014-11-11 20:58:06编辑过]

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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 21:14:00 [显示全部帖子]

哇塞,太强大了

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


加好友 发短信
等级:婴狐 帖子:66 积分:564 威望:0 精华:0 注册:2013/2/2 21:24:00
  发帖心情 Post By:2014/11/11 21:27:00 [显示全部帖子]

田田老师,我在状态栏选择了几个后,重新启动项目,发现一个问题:之前在明细中录入的数据,那些状态没有勾选的就在对应的列里面就消失了,只剩下了勾选的那些内容

 


 回到顶部
总数 22 1 2 3 下一页