以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  后台打印代码有误  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=135689)

--  作者：lihe60 --  发布时间：2019/6/1 10:35:00 --  后台打印代码有误 使用内部表有误，“Book.Build() \'生成细节区”有误，如何解决 Dim Book As New XLS.Book(ProjectPath & "Attachments\\交房清单.xls") Dim fl As String = ProjectPath & "Reports\\交房清单.xls" book.AddDataTable("业务",cmd.connectionname,"Select 单位名称 fr om {业务} where 合同编号= \'" & tjt.current("合同编号") & "\' and 单据类型=\'销售合同\'" & _filter) \'添加父表 book.AddDataTable("交房清单",cmd.connectionname,"Select 交房清单,数量或金额 fr om {交房清单} where 合同编号= \'" & tjt.current("合同编号") & "\'" & _filter) \'添加子表 book.AddRelation("业务","合同编号","交房清单","合同编号") \'建立关联 MessageBox.Show(3) Book.Build() \'生成细节区 MessageBox.Show(4) Book.Save(fl) \'保存工作簿 Dim Proc As New Process \'打开工作簿 Proc.File = fl Proc.Start()

--  作者：有点蓝 --  发布时间：2019/6/1 10:55:00 --   Select 合同编号，单位名称 fr om {业务}  Select 合同编号，交房清单,数量或金额 fr om {交房清单}

--  作者：lihe60 --  发布时间：2019/6/1 11:22:00 --   book.AddDataTable("交房清单",cmd.connectionname,"Select 合同编号,交房清单,数量或金额 fr/om {交房清单} where 合同编号= \'" & tjt.current("合同编号") & "\'" & _filter) \'添加子表 这样改了，还是不行。

--  作者：有点蓝 --  发布时间：2019/6/1 11:35:00 --   2个表都要改。模板是怎么设置的？