Foxtable(狐表)用户栏目专家坐堂 → 下拉列表筛选


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

主题:下拉列表筛选

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
下拉列表筛选  发帖心情 Post By:2020/12/28 9:29:00 [显示全部帖子]

下面代码显示代码列所有项目,现在代码列有4个字符6个字符,我只想显示4个字符的项目,代码如何?
If e.Col.Name = "代码" Then 
     e.Col.Combolist = DataTables("产品").GetComboListString("代码")
End If


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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2020/12/28 10:07:00 [显示全部帖子]

还要麻烦下,上面代码列是1级代码,现有2级代码列,需要取字符6位数,要根据代码列的前4位筛选。例如,代码列取值1002,该列还有100201,100202,100203.....等,2级代码列就是要下拉筛选出这些值

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2020/12/28 10:28:00 [显示全部帖子]

4楼代码只是筛选出所有6位数代码,我只是要求筛选出对应的代码。例如,已经在当前表的代码列筛选出1002,1003等等,我要求二级代码列根据当前代码列的数值,从产品表下拉显示对应的6位数项目,不是显示全部。
型如这样的代码
If e.Col.Name = "规格" Then 
    e.Col.Combolist = DataTables("产品").GetComboListString("规格","[型号] = '" & e.Row("型号"))
End If

[此贴子已经被作者于2020/12/28 10:29:18编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2020/12/28 11:33:00 [显示全部帖子]

If e.Col.Name = "明细科目" Then 
     e.Col.Combolist = DataTables("会计科目").GetComboListString("明细科目","[科目代码] = '" & e.Row("总账科目") & "' and len(科目代码)=6")
End If
好像不对,现提供表结构。我想凭证明细表的明细科目根据总账科目下拉筛选。

图片点击可在新窗口打开查看此主题相关图片如下:会计科目.jpg
图片点击可在新窗口打开查看


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


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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2020/12/28 12:02:00 [显示全部帖子]

应该是:e.Col.Combolist = DataTables("会计科目").GetComboListString("科目代码","[科目代码] like '" & e.Row("总账科目") & "%'")
谢了。

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2020/12/28 12:10:00 [显示全部帖子]

还不能满足要求。我想下拉输入的是科目名称而不是代码,下拉中应该显示科目代码和科目名称。

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2020/12/28 19:10:00 [显示全部帖子]

以上会计科目的表结构不大好用,我改了一下表结构,希望在凭证明细表中下拉显示的是一级代码+一级科目,但输入的是一级科目

图片点击可在新窗口打开查看此主题相关图片如下:会计科目.jpg
图片点击可在新窗口打开查看

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

If e.Col.Name = "总账科目" Then 
    e.Col.Combolist = DataTables("会计科目").SqlGetComboListString("一级代码+一级科目")?
End If

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2020/12/28 20:12:00 [显示全部帖子]

14楼不是很明白

 回到顶部