Foxtable(狐表)用户栏目专家坐堂 → 跨项目表间数据传递


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

主题:跨项目表间数据传递

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/2 20:29:00 [显示全部帖子]

 你项目1,要添加外部表表2。然后参考 http://www.foxtable.com/webhelp/scr/2490.htm

 

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/13 11:25:00 [显示全部帖子]

 你的列是 表达式列 吧?要改成数据列

 

http://www.foxtable.com/webhelp/scr/1380.htm

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/13 15:43:00 [显示全部帖子]

 例子发上来看看吧。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/16 19:27:00 [显示全部帖子]

没看到实例,请正确上传文件。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/17 9:31:00 [显示全部帖子]

以下是引用foxuser在2017/8/17 9:07:00的发言:
添加了附件,点上传附件,显示成功,又没显示呢

 

用ie浏览器访问论坛试试。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/17 14:22:00 [显示全部帖子]

1、你的数据库发上来才能测试;

 

2、哪个表做哪些操作后,有哪些问题?请详细说明。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/23 15:18:00 [显示全部帖子]

请把你的数据库文件发上来,连不上你的数据库。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/23 18:58:00 [显示全部帖子]

以下是引用foxuser在2017/8/23 17:32:00的发言:
已上传,说明在DATA压缩包里

 

你那个不是数据库文件,如何还原数据?


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/24 10:45:00 [显示全部帖子]

Test1没有显示数据的问题 http://www.foxtable.com/webhelp/scr/1813.htm

 

填充的问题,修改代码

 

Select Case e.DataCol.name
    Case "产品编号"
        Dim dr As DataRow
        If e.OldValue = Nothing Then
            dr = DataTables("F表").sqlFind("产品编号 = '" & e.NewValue & "'")
        Else
            dr = DataTables("F表").sqlFind("产品编号 = '" & e.OldValue & "'")
        End If
        If dr Is Nothing Then
            dr = DataTables("F表").AddNew()
            dr("产品编号") = e.DataRow("产品编号")
            dr("产品名称") = e.DataRow("产品名称")
            dr("产品规格") = e.DataRow("产品规格")
        Else
            dr("产品编号") = e.DataRow("产品编号")
        End If
        dr.save
    Case "产品名称","产品规格"
        Dim dr As DataRow = DataTables("F表").sqlFind("产品编号 = '" & e.DataRow("产品编号") & "'")
        If dr IsNot Nothing Then
            dr(e.DataCol.Name) = e.DataRow(e.DataCol.Name)
        End If
        dr.save
End Select


 回到顶部