access 报表中图片文件路径变更

zhmalbert

access报表中，有一张报表根据选择的内容，自动调用access目录中图片文件中某个图片，现在希望把图片文件移动其他目录下，不知道如何处理，不知描述是否清楚，如下图所示，看看VB应该怎么改

Option Compare Database

Private Sub stuimg_Click()

End Sub

Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
On Error GoTo Err_主体_Format

  Dim imgpath As String
  imgpath = Application.CurrentProject.Path（把这个改成绝对路径如E:\tri） + "\" + jyuyouka.Text （根据报表中特定字段获得二级文件夹）+ "\" + hinnmei_code.Text + ".png"
  If Dir(imgpath) = "" Then imgpath = Application.CurrentProject.Path + "\noimg.bmp"
  stuimg.Picture = imgpath

Exit_主体_Format:
    Exit Sub

Err_主体_Format:
    'MsgBox Err.Description
    Resume Exit_主体_Format

End Sub

zhangjimfu

我一般会用更新查询,修改图片存放的路径