局域网中不显示图片？

xie62

请教：
将“图片”文件夹共享、映射网络驱动器后，前台文件放置别的机上时不能显示图片？
Private Sub Form_Current()
Dim TempPhotoPath As String
TempPhotoPath = CurrentProject.Path & "Y:\图片\" & Me.图片地址 & ".jpg"
    If FileExistCheck(TempPhotoPath) = 1 Then  
       Me.照片.Picture = TempPhotoPath
       Else
       Me.照片.Picture = ""     
    End If
End Sub

xie62

todaynew

CurrentProject.Path 是程序文件所在的地址，后面再带盘符似乎不对吧？

xie62

谢谢todaynew 老师指导，问题以解决。