以下是引用susu312在2018/8/7 18:23:00的发言:
读取生成JPG文件这一步咋做啊
照片已经提取出来了:
If Tables("person").Current Is Nothing Then
Return
End If
Dim dr As DataRow = Tables("person").Current.DataRow
Dim fl As String = "C:\Users\sujia\Documents\Foxtable项目\retireMg\" & dr("_Identify") & ".JPG"
If dr.SQLLoadFile("photo",fl) Then '如果提取文件成功
Dim Proc As New Process '打开文件
Proc.File = fl
'Proc.Start()
Else
Messagebox.Show("照片提取失败,可能并不存在附件!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
但是在专业报表里面引用我不会,请老师指导一下:
rt.Cells(0,4).Image =[<*"&&" & [_Identify] & ".JPG"*>]
上面是我自己写的,报错了