成都网站建设设计

将想法与焦点和您一起共享

ADO中怎么利用GetCollect()函数获取EXCEL表格中完整数字

本篇文章为大家展示了ADO中怎么利用GetCollect()函数获取EXCEL表格中完整数字,内容简明扼要并且容易理解,绝对能使你眼前一亮,通过这篇文章的详细介绍希望你能有所收获。

10年积累的网站设计制作、网站设计经验,可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你,你也不认识我。但先网站设计制作后付款的网站建设流程,更有伊州免费网站建设让你可以放心的选择与我们合作。

      ADO是一组由微软提供的COM组件,基于面向对象思想的编程接口。它建立在COM体系结构之上,它的所有接口都是自动化接口,因此在C++、VisualBasic、Delphi等支持COM的开发语言中通过接口都可以访问到ADO。ADO对象模型非常精炼,由三个主要对象Connection、Command、Recordset和几个辅助对象组成。

我们利用ADO技术的GetCollect()函数读取excel表中的字符串中会发现如果数字行数过长(一般>255行)会出现读取的数据不完整这种情况。这是笔者在一年前写一个读取excel表格数据中出现的情况。针对这个问题,笔者上网查询了一些材料,找到了一个很好的解决方法,并且很好的解决了这个问题。

     问题的原因是这样的,因为在使用ADO.NET读取Excel表格时,OLEDB(Excel
2000-2003一般是是Jet 4.0,Excel 2007是ACE 12.0,即Access Connectivity Engine,ACE也可以用来访问Excel
2000-2003)会默认扫面Sheet中的前几行来决定数据类型,Excel并不像Access一样,一列中的单元格的数据类型可能不一样,用ADO.NET读取Excel时,ole
db(JET) 会扫描sheet中前几行,默认是8行(这个值可在注册表中TypeGuessRows设定)来决定当前列的数据类型。这样,就给我们提供了一个解决这个问题的方法,需要通过修改注册表中的TypeGuessRows的值来来解决这个问题。考虑一列数据,如果前8行都是数字,那么JET扫描没有问题。如果8行内的数据类型不一样,JET会采用一个都适合的数据类型来匹配,通常为varchar或unicode
varchar。 现在的问题是,前8行的数据如果短小,JET匹配了varchar,只有255字符。而实际可能是其它更大的数据。 
      

     如果设置前面的TypeGuessRows=0,这样会查询16384行,查询完后匹配一个最合适的数据类型,不过这个长度对于我来说已经绰绰有余,所以有一个很好的解决方法就是将TypeGuessRows的值设为0;

TypeGuessRows在注册表中的路径如下所示:

     Excel 2000-2003 : HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Excel\

     Excel 2007 : HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\12.0\Access Connectivity Engine\Engines\Excel

   (其取值范围为十进制闭区间0-16)

    所以我们就可以写一个很简单的程序来解决该问题,代码很简单,如下所示

void SetTypeGuessRowsValue()
{
   HKEY hKEY;
   LPCTSTR dataSet="SOFTWARE\\Microsoft\\Jet\\4.0\\Engines\\Excel\\";
   //打开与路径 dataSet 相关的hKEY,KEY_WRITE表示以写的方式打开
   long retn = ( ::RegOpenKeyEx(HKEY_LOCAL_MACHINE,dataSet, 0, KEY_WRITE, &hKEY) );
   if( retn != ERROR_SUCCESS )
   {
      MessageBox("错误: 无法打开有关的hKEY!");
      return;
   }

   //修改TypeGuessRows值
   DWORD type = REG_DWORD;
   DWORD cbData = 2;
   BYTE  VAL = 0;

   retn =::RegSetValueEx(hKEY, "TypeGuessRows", NULL, type, &VAL, cbData);
   if( retn != ERROR_SUCCESS )
   {
      MessageBox("错误: 无法修改有关注册表信息!");
      return;
   }
}

上述内容就是ADO中怎么利用GetCollect()函数获取EXCEL表格中完整数字,你们学到知识或技能了吗?如果还想学到更多技能或者丰富自己的知识储备,欢迎关注创新互联行业资讯频道。


本文标题:ADO中怎么利用GetCollect()函数获取EXCEL表格中完整数字
文章来源:http://chengdu.cdxwcx.cn/article/pddjdj.html