整个程序是不是这样呀: E盘有文件夹JPG,数据库有表ME,二个字段:编号和姓名.一个窗体ME
Private Sub 照片_Click()
If Dir("e:\jpg\" & Me!编号 & ".bmp") <> "" Then
Me!照片.Picture = "e:\jpg\" & Me!编号 & ".bmp"
End If
End Sub
Private Sub 照片_AfterUpdate()
On Error Resume Next
Me![照片].Picture = CurrentProject.Path + "\jpg\" + Me![照片]
End Sub
这样数据库是小很多了,不过又带来了另一个问题:
我建一个报表,要打印编号、姓名、照片,可是无法在报表中显示和打印照片