Foxtable(狐表)用户栏目专家坐堂 → 填充条件:有勾选复选框的才填充


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

主题:填充条件:有勾选复选框的才填充

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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
填充条件:有勾选复选框的才填充  发帖心情 Post By:2014/2/28 16:49:00 [显示全部帖子]

要想让窗口中的查询表{VIP基本信息表}有勾选,点击窗口中的发送短信,然后把有勾选的行填充到  提交短信  窗口中的{收信人}的表中:

要怎么做呢?
现在就是只是不重复地填充。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:填充条件:有勾选复选框的才填充.rar



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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2014/2/28 19:41:00 [显示全部帖子]

谢谢Bin老师!!

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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2014/3/4 15:46:00 [显示全部帖子]

Bin老师,可能是我还没理解这句代码的意思,我在收信人的这张表里增加了“回访类别”就出错了,你帮我看下。。

图片点击可在新窗口打开查看此主题相关图片如下:多增加了 回访类别 列出现了问题.jpg
图片点击可在新窗口打开查看




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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2014/3/4 15:46:00 [显示全部帖子]

附件:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:填充条件:有勾选复选框的才填充.rar


after load 的代码:

For Each r As Row In Tables("VIP基本信息_VIP基本信息").GetCheckedRows
    Dim rr As Row = Tables("VIP基本信息提交短信_收信人").AddNew
    For Each c As Col In Tables("VIP基本信息提交短信_收信人").Cols
        If c.Name<>"内容" Then
            rr(c.name)=r(c.name)
        End If
    Next
Next
[此贴子已经被作者于2014-3-4 15:47:05编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2014/3/4 16:14:00 [显示全部帖子]

但是 “内容”这一列在Tables("VIP基本信息_VIP基本信息").里也没有对应的。。。

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


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2014/3/4 16:17:00 [显示全部帖子]

哈,可以啦。我懂了

  If c.Name<>"内容" and  c.Name<>"回访类别" Then

就可以了

 回到顶部