以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何用sql视图生成子表数据  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=136972)

--  作者:chen_sheng
--  发布时间:2019/6/25 17:16:00
--  如何用sql视图生成子表数据
1 有个主子表   主表的单号自动生成
2 子表数据根据sql视图生成,主表的单号如何传递到子表
图片点击可在新窗口打开查看此主题相关图片如下:用视图生成子表数据.jpg
图片点击可在新窗口打开查看

--  作者:chen_sheng
--  发布时间:2019/6/25 17:25:00
--  
启动各位大师指导
--  作者:有点甜
--  发布时间:2019/6/25 17:28:00
--  

 

http://www.foxtable.com/webhelp/topics/1777.htm

 

 


--  作者:chen_sheng
--  发布时间:2019/6/25 17:46:00
--  
此参考只有加载并没有保存部分解释
--  作者:有点蓝
--  发布时间:2019/6/25 20:38:00
--  
视图加载的数据只能通过SQL保存:http://www.foxtable.com/webhelp/topics/0696.htm
--  作者:chen_sheng
--  发布时间:2019/6/26 8:51:00
--  
’Dim cmd As New SQLCommand
’Dim dt As DataTable
’Dim Cols1() As String = {"dh","hh","sl"}
’Dim Cols2() As String = {"dh","hh","sl"}
’cmd.C
’cmd.CommandText = "‘SE  dh,hh,sl From {txmxhz}"
dt = cmd.ExecuteReader()
For Each dr1 As DataRow In dt.DataRows
    Dim dr2 As DataRow =  DataTables("zzmjcomtxmxzb.zzmjcomtxmxhz").AddNew()
    For i As Integer = 0 To Cols1.Length -1
        dr2(Cols2(i)) = dr1(Cols1(i))
    Next
Next

zzmjcomtxmxzb是主表,是不是可以这样再指导修改一下代码就可以了

--  作者:chen_sheng
--  发布时间:2019/6/26 8:53:00
--  
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim Cols1() As String = {"dh","hh","sl"}
Dim Cols2() As String = {"dh","hh","sl"}
cmd.C
cmd.CommandText = "SELECT dh,hh,sl Fro m {mjcomtxmxhz}"
dt = cmd.ExecuteReader()
For Each dr1 As DataRow In dt.DataRows
    Dim dr2 As DataRow =  DataTables("zzmjcomtxmxhz").AddNew()
    For i As Integer = 0 To Cols1.Length -1
        dr2(Cols2(i)) = dr1(Cols1(i))
    Next
Next

zzmjcomtxmxzb是主表,是不是可以这样再指导修改一下代码就可以了

--  作者:有点甜
--  发布时间:2019/6/26 9:40:00
--  

 

上传具体实例,说明你要做到的效果。

 


--  作者:chen_sheng
--  发布时间:2019/6/26 10:17:00
--  
1  主表和子表均为sql表
2  子表需要从sql视图数据生成   具体见sql语句
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


--  作者:chen_sheng
--  发布时间:2019/6/26 10:25:00
--  
烦请帮忙尽快处理
[此贴子已经被作者于2019/6/26 15:31:14编辑过]