SQLLoadFile

DataRow的一个方法，用于从二进制列中提取文件。

语法：

SQLLoadFile(Field,FileName)

Field:     字符型，二进制列的列名
FileName:  字符型，文件名，提取的内容将保存在此文件中。

如果成功提取文件，返回True，否则返回False。

示例

假定员工表的附件列中存有Word文件，下面的代码可以提取这个Word文件并打开之：

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