以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  不能顺利打开窗体  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=151556)

--  作者:rgbjwjb
--  发布时间:2020/6/27 23:11:00
--  不能顺利打开窗体
我打开“功能窗体”后,点击窗体中各按钮,每次都要在“主窗体”和相应的功能窗体切换,请问如何设置才能解决此问题?谢谢指教!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:江安法律服务所.zip


--  作者:有点蓝
--  发布时间:2020/6/28 9:05:00
--  

Forms("词典").Open
MainTable = Tables("词典维护")

--  作者:rgbjwjb
--  发布时间:2020/6/28 10:48:00
--  

修改后,应该主界面应该是空白的,怎么主界面上还有“MAIN”表的?请指教,谢谢!!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:江安法律服务所.rar


--  作者:有点蓝
--  发布时间:2020/6/28 10:53:00
--  
主界面绑定的本来就是一个空表,http://www.foxtable.com/webhelp/topics/2654.htm
--  作者:rgbjwjb
--  发布时间:2020/6/30 18:15:00
--  

打印excel报表的代码为:Dim Book As New XLS.Book(ProjectPath & "Attachments\\卷内文件目录表.xls")
Dim fl As String = ProjectPath & "Reports\\卷内文件目录表.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
sheet(4,10).Value = "[案件号] = \'" & Tables("目录表").Current("案件号") & "\'"
Book.Build()
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
proc.Verb = "Print"
Proc.Start()

执行后显示:打开存储文件失败。请问哪里需要修改?请指教,谢谢!


--  作者:有点蓝
--  发布时间:2020/6/30 20:32:00
--  
是否存在这个路径的文件?msgbox(ProjectPath & "Attachments\\卷内文件目录表.xls"

项目里是否有“Reports”目录,没有手工创建一个。

如果要做条件sheet(4,10).Value = "[案件号] = \'" & Tables("目录表").Current("案件号") & "\'"
改为
sheet(4,10).Value = "<[案件号] = \'" & Tables("目录表").Current("案件号") & "\'>"

--  作者:rgbjwjb
--  发布时间:2020/6/30 20:51:00
--  
修改后还是同样的问题,请帮看看,谢谢!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:江安法律服务所.zip


--  作者:有点蓝
--  发布时间:2020/6/30 21:45:00
--  
都说自己检查一下文件名咯,“卷内目录文件表.xls”不是“卷内文件目录表.xls”。

另外子表不需要也无法指定条件。父表默认就是打印当前行,也不需要使用当前行作为条件,这句就是多余的
sheet(4,10).Value = "<[案件号] = \'" & Tables("目录表").Current("案件号") & "\'>"

--  作者:rgbjwjb
--  发布时间:2020/7/1 11:30:00
--  

谢谢!