Foxtable(狐表)用户栏目专家坐堂 → 动态数据字典问题


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

主题:动态数据字典问题

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


加好友 发短信
等级:婴狐 帖子:3 积分:86 威望:0 精华:0 注册:2018/5/22 11:55:00
动态数据字典问题  发帖心情 Post By:2018/5/23 10:30:00 [只看该作者]

If MainTable.Name = "交易平台配置与计算" Then
   Dim dt As DataTable = DataTables("交易平台配置与计算")
   Dim dc As DataCol = dt.DataCols("交易平台_产品_产品类目")
 Dim dmp As New TableDataMap
    dmp.DataTable = "接引资源库" '指定数据来源表
    dmp.ValueCol = "资源块名称" '指定取值列
    dmp.DisplayCol = "资源块名称" '指定显示列
    '指定下拉列表时显示哪些列的数据
dmp.ListCols = "资源块名称,系统面向类目"
dmp.Filter = "系统面向类目 in '" & dc & "'"
    Tables("交易平台配置与计算").Cols("接引资源块_资源名称").DataMap = dmp.CreateDataMap() '生成并设置DataMap
End If


图片点击可在新窗口打开查看此主题相关图片如下:53jt`0`@8$2{lu3juzm9l6.png
图片点击可在新窗口打开查看



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


加好友 发短信
等级:婴狐 帖子:3 积分:86 威望:0 精华:0 注册:2018/5/22 11:55:00
  发帖心情 Post By:2018/5/23 10:30:00 [只看该作者]

请问 这个代码的问题出在哪

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/23 10:37:00 [只看该作者]

If MainTable.Name = "交易平台配置与计算" Then
    Dim dt As DataTable = DataTables("交易平台配置与计算")
    Dim dc As String = dt.GetComboListString("交易平台_产品_产品类目")
    dc = dc.Replace("|", "','")
    Dim dmp As New TableDataMap
    dmp.DataTable = "接引资源库" '指定数据来源表
    dmp.ValueCol = "资源块名称" '指定取值列
    dmp.DisplayCol = "资源块名称" '指定显示列
    '指定下拉列表时显示哪些列的数据
    dmp.ListCols = "资源块名称,系统面向类目"
    dmp.Filter = "系统面向类目 in ('" & dc & "')"
    Tables("交易平台配置与计算").Cols("接引资源块_资源名称").DataMap = dmp.CreateDataMap() '生成并设置DataMap
End If

[此贴子已经被作者于2018/5/23 10:37:20编辑过]

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


加好友 发短信
等级:婴狐 帖子:3 积分:86 威望:0 精华:0 注册:2018/5/22 11:55:00
  发帖心情 Post By:2018/5/23 11:20:00 [只看该作者]

谢谢 谢谢 成功了 

 回到顶部