主题：[求助]二进制

老师好，员工表初始不加载，窗口表是直接引用外部数据源"员工"表（Select * F rom {员工表} ）外部数据照片列是二进制，窗口图片控件"PictureBox1"怎样显示图片。

老师下面代码怎样修改。

If Forms("窗口1").Opened Then '如果窗口已经打开
    Dim pbx As WinForm.PictureBox = Forms("窗口1").Controls("PictureBox1")
    If Tables("员工").Current Is Nothing Then
        pbx.Image = Nothing
    Else
        pbx.Image = Tables("员工").Current.DataRow.SQlLoadImage("照片") '从后台提取照片并显示
    End If
End If

老师，窗口控件怎样和员工表同步。我是直接引用的”Select * F rom {员工表}"。

老师，报错

 

此主题相关图片如下：图像 055.png

老师，下面代码怎样修改成打开图片，望老师指点。

If Tables("员工").Current Is Nothing Then

    Return

End If

Dim dr As DataRow = Tables("员工").Current.DataRow

Dim fl As String =  ProjectPath &  dr("_Identify") & ".doc"

If dr.SQLLoadFile("附件",fl) Then '如果提取文件成功

    Dim Proc As New Process '打开文件

    Proc.File = fl

    Proc.Start()

Else

    Messagebox.Show("附件提取失败,可能并不存在附件!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)

End If

老师，打开的不是图片，而是文档。

谢谢老师

老师，二进制增加或插入的图片怎样另存为。

老师，我是想在添加和插入时自动另存为（设置路径自动另存为）