主题：关于二进制列的优劣，还清请版主给讲讲吧

If Tables("员工").Current Is Nothing Then
    Return
End If
Dim dr As DataRow = Tables("员工").Current.DataRow
Dim fl As String =  ProjectPath &  dr("_Identify") & ".*"
If dr.SQLLoadFile("附件",fl) Then '如果提取文件成功
    Dim Proc As New Process '打开文件
    Proc.File = fl
    Proc.Start()
Else
    Messagebox.Show("附件提取失败,可能并不存在附件!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If

 

这个代码，打不开附件，是为什么？

你的代码和我的代码长得是一模一样的，运行结果也是一样的。