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
加好友 
发短信
Post By：2016/4/3 11:43:00 [显示全部帖子]
