以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=83190)

--  作者:168448704
--  发布时间:2016/4/2 17:16:00
--  [求助]
(1)本人在人事档案管理中有一个照片列,在表的BeforeAttachFile事件中设置代码如下:
\'以下代码将照片放在命名为姓名的文件夹中
Select Case e.DataCol.Name
    Case "照片" \'如果在照片列插入文件
        e.Subfolder = e.DataRow("姓名")  \'将此文件存放在目录名为姓名名称的子目录中.
End Select
在设计专业报表的时候,如何应用照片?
以下代码该如何编写
rt.Cells(1,9).Image = GetImage(rw("照片"))
(2)在专业报表中如何象Word一样引用子表中的某一行或某一单元格数据?
谢谢!

--  作者:大红袍
--  发布时间:2016/4/3 11:43:00
--  

1、

 

Dim fp As String = ProjectPath & "Attachments/" & rw("照片")
msgbox(fp)
rt.Cells(1,9).Image = GetImage(fp)

 

2、参考

 

http://www.foxtable.com/help/topics/1249.htm

 


--  作者:168448704
--  发布时间:2016/4/5 17:29:00
--  
谢谢,照片打印问题已解决,报表问题还需学习。