如何读取DBF文件中作了删除标记的记录

Deleted=NO 不识别删除标记
Deleted=YES 识别删除标记
例如：xxxdbf 文件中有数据①和数据②，数据①为打删除标记，数据②为不打删除标记
Dim ConDBF1 As New ADODBConnection
Dim rsDbf1 As New ADODBRecordset
FPath = "C:\ADMIN\Desktop\xxx\"
fileName = "XXXdbf"
strCnn = "driver=MicroSoft Visual Foxpro Driver;SourceDB=" & FPath & ";SourceType=DBF;Deleted=NO;"
ConDBF1Open strCnn
rsDbf1Open "select from " & fileName, ConDBF1, adOpenStatic
DebugPrint rsDbf1RecordCount
当 Deleted=NO ，结果为2条
当 Deleted=YES ，结果为1条

你用了什么数据接口，bde？odbc？ado要是后两个直接把生成的执行文件拷贝就行了（保证编译时bpl是非动态连接的，在option中设置） 查看更多答案>>
麻烦采纳，谢谢!

1：编码方式由ASCII码和Unicode码其中Unicode码包括UTF-8,UTF-16,UTF-32三种,其中UTF-8是变长码，由于解码错误，导致了打开错误，你可以使用RTF（写字板）或者Word等软件打开2：源文件根本就不是文本文件，有些人出于保密或者网络传输方便（有些网络传输对格式有明确限制，所以需要修改扩展名）把源文件的扩展名改成了txt

请先通过 OCR软件将PDF的内容进行识别，转换为为EXCEL后，再导入数据库。
OCR软件可以用汉王PDF OCR81简体中文版的PDF识别软件，简单易用免费。网上有下载。
方法是下载安装汉王pdf ocr81，运行并打开PDF文件，如PDF的字号较小，在打开时请不用默认分辨率，自行设定最高分辨率为600DPI，逐页打开PDF文件后，可直接进行识别，但最好是进行水平调整，手工设置识别区域，分出文字区、表格区和区，然后才开始识别，这样的识别率较高，识别后进行校稿，对照原稿校正错别字。最后是选择已识别转换校对好的页面，在菜单-输出-到指定输出文件格式，可输出为TXT、RTF、XLS等文件格式。如要输出EXCEL格式，请选择XLS格式，用EXCEL打开后，按需要编辑一下即可。

---