通过oledb驱动读取excel、csv数据丢失解决方案
1、问题出现
在开发应用程序的过程中，比较常用一功能就是通过oledb驱动读取excel、csv、text等文件；而最近有客户反映，在使用短信平台（下载地址：http://www.sms1086.com/product/detail-150.html），发现出现以下问题：
还有一种情况，excel只能导入部分，而其他的导入不进去。
而其他excel或text文件，不会出现此类问题。但是将有问题的excel粘贴到新建的文件中，还会出现类似问题。
2、网上解答
在博客园http://www.cnblogs.com/clare-zhang/archive/2012/05/30/2525884.html给出了解决方案：
查询注册表，将TypeGuessRows=8 修改为 TypeGuessRows=0
下图是Win10 64位企业版的修改位置，操作系统不通，修改地方不通；建议查询注册表，修改所有TypeGuessRows为0
按照此方法，可解决Excel数据丢失问题。棒棒的~~~~~~~~
3、读取Text文件数据丢失
Excel文件问题解决了，但是在读取csv、text文件，仍然出现数据丢失的问题，是什么原因引起的呢？与excel对比，不难发现，还是注册表配置的问题。
通过查询注册表，找到Text的驱动：
修改MaxScanRows=0即可解决问题。
4、TypeGuessRows详解
要使用 Jet OLE DB 提供程序访问 Excel 工作簿，请使用具有下列语法的连接字符串：
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\sms.xls;Extended Properties="Excel 8.0;HDR=YES;"
在连接字符串中，用 Data Source 参数指定工作簿的完整路径和文件名。Extended Properties 参数可包含两种属性：一个属性用于 ISAM 版本，一个属性用于指示表是否包括标题。
使用 Excel 工作簿时，默认情况下，区域中的第一行是标题行（或字段名称）。如果第一个区域不包含标题，您可以在连接字符串的扩展属性中指定 HDR=NO。如果您在连接字符串中指定 HDR=NO，Jet OLE DB 提供程序将自动为您命名字段（F1 表示第一个字段，F2 表示第二个字段，依此类推）。
与传统的数据库不同，在 Excel 表中没有指定列的数据类型的直接方式。而是，OLE DB 提供程序通过对一列中的八行进行扫描来猜测 该字段的数据类型。您可以通过为连接字符串的扩展属性中的 MAXSCANROWS 设置指定一个一 (1) 至十六 (16) 之间的值，来更改要扫描的行数。
而注册表中TypeGuessRows=8，默认从前8行进行扫描来猜测该字段的数据类型，设置TypeGuessRows=0表示不猜测数据类型。
5、MaxScanRows详解
与Excel注册表参数雷同，MaxScanRows=19（16进制）表示从前25行进行扫描猜测该字段的数据类型。
在不修改注册表的情况下，可通过以下连接字符串实现（VB代码）:
strConn = "" strConn = strConn & "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFolder & ";" strConn = strConn & "Extended Properties=" strConn = strConn & Chr(34) strConn = strConn & "text;CharacterSet=UNICODE;HDR=Yes;FMT=Delimited;IMEX=1;MaxScanRows=0;" strConn = strConn & Chr(34) Set cn = New ADODB.Connection With cn .Provider = "Microsoft.Jet.OLEDB.4.0" ' this line is redundant, but it helps you read the code .ConnectionString = strConn .Properties("Jet OLEDB:Registry Path") = "SOFTWARE\TacticalApps\MyApp\1.0" .Mode = adModeRead .Open End With
腾信集团（www.sms1086.com）欢迎您的光临~~~
