sql - 如何使用 VFP 从 SQL 读取 varbinary (max) 字段值并将其另存为 pdf？

Question

我正在将我的 vfp 应用程序与 SQL 服务器连接起来。一张具有 varbinary 字段的表，我需要读取二进制文件并将其转换为 pdf 文件。我怎么能做到这一点？

Answer 1

您的意思是 varbinary 数据本身是 PDF 文件（或任何文件）吗？如果是这样，只需将获得的字节保存到扩展名为 .PDF 的文件中。IE：

假设您在数据库“test”中有一个名为“Files”的表，其中包含 Id、FileExt 和 FileContent 等字段。包含扩展名的 FileExt 和 FileContent 是文件本身作为 varbinary(Max)。您想将所有文件保存到名为 'c:\temp\files' 的文件夹中：

Local handle, filename
handle = Sqlstringconnect("driver={Sql Server Native Client 11.0};server=.\SQLExpress;Database=test;Trusted_Connection=yes")

SQLExec(m.handle, 'Select * from [Files]', 'crsData')
SQLDisconnect(m.handle)

Select crsData
Scan
    fileName = Forcepath(Forceext(Ltrim(Str(crsData.Id)),Trim(crsData.FileExt)))
    Strtofile(crsData.FileContent, m.fileName, 'c:\temp\files')
Endscan