图片显示示例中打印时候图片固定无法连续

天地　发表于：2011-12-20 09:06:52 　

http://www.accessoft.com/article-show.asp?id=5231

网站里找了下示例，按这个示例做了下，后来发现只有窗体正常，可以连续翻页，照片和数据一起可以变化，但是打印的话打开谁照片打印出来的都是同一张，下面数据是会变的。一般不是应该照片和人的资料一起变化的吗？这个里面要改点什么才可以做到？

mmtea 发表于：2011-12-20 10:55:11

要在报表中加入那段代码，如

Private Sub Report_NoData(Cancel As Integer)
    MsgBox "没有此段时间的照片。取消打印..."
    Cancel = -1
End Sub
Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
If Dir(CurrentProject.Path & "\photo\" & Me.工号 & ".jpg") = "" Then
            Image16.Picture = CurrentProject.Path & "\" & "err.jpg"
        Else
            Image16.Picture = CurrentProject.Path & "\photo\" & Me.工号 & ".jpg"
        End If
End Sub

Top

天地发表于：2011-12-26 11:24:41

不是报表里的，是用在打印里的，加在这个窗体里打印预览能显示每个照片吗？

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

图片显示示例中打印时候图片固定无法连续