社区应用 社区服务 会员列表 统计排行 帮助 银行
  • 153阅读
  • 7回复

[求助]excel导入程序为什么只能导入2003,2007的文件导入不了?

楼层直达
级别: 商业用户
发帖
1564
铜币
2143
威望
0
E积分
0
技术积分
0
高手们这个excel导入程序为什么只能导入2003?,2007和wps表格的文件导入不了? excel导入.e (702 K) 下载次数:11 ,谢谢。
级别: 幼儿园
发帖
44
铜币
0
威望
0
E积分
0
技术积分
0
只看该作者 沙发  发表于: 12-07
为什么只能导入2003?
级别: 商业用户
发帖
1564
铜币
2143
威望
0
E积分
0
技术积分
0
只看该作者 板凳  发表于: 12-07
我现在要 2007和wps也能导入,可这个代码不好使,帮我看下好吗?谢谢。
发帖
1004
铜币
1754
威望
0
E积分
0
技术积分
0
只看该作者 地板  发表于: 12-07
级别: 商业用户
发帖
117
铜币
259
威望
0
E积分
0
技术积分
0
只看该作者 4楼 发表于: 12-07
Microsoft ACE OLEDB 12.0 数据库连接字符串(命令集)
Excel97-2003
Provider=Microsoft.ACE.OLEDB.12.0;DataSource=c:\myFolder\myOldExcelFile.xls;Extended Properties="Excel 8.0;HDR=YES";
Excel 2007-2013
Provider=Microsoft.ACE.OLEDB.12.0;DataSource=c:\myFolder\myExcel2007file.xlsx;Extended Properties="Excel 12.0 Xml;HDR=YES";
Access 97-2003
Provider=Microsoft.ACE.OLEDB.12.0;DataSource=C:\myFolder\myAccessFile.mdb;Persist Security Info=False;
Access 2007
Provider=Microsoft.ACE.OLEDB.12.0;DataSource=C:\myFolder\myAccessFile.accdb;Persist Security Info=False;
DBF / FoxPro
Provider=Microsoft.ACE.OLEDB.12.0;DataSource=c:\folder;ExtendedProperties=dBASE IV;User ID=Admin;
注:"HDR=Yes;"声名第一行的数据为域名,并非数据。 "HDR=No;"第一行为数据。
操作流程
.版本 2
.局部变量 conn, 对象
.局部变量 rs, 对象

conn.创建 (“ADODB.Connection”, )  ' 使用 Connection 对象来建立一个连接
rs.创建 (“ADODB.RecordSet”, )  ' 由  Recordset 对象传递一个连接字符串来创建某个连接
conn.方法 (“open”, “Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Excel 8.0;data source=” + excel文件名 + “;”)
rs = conn.对象型方法 (“OpenSchema”, 20)
rs.方法 (“MoveFirst”, ).版本 2
. 判断循环首 (rs.读逻辑属性 (“EOF”, ) = 假)  ' end of file
    XLS表名 = rs.对象型方法 (“Fields”, ).读对象型属性 (“Item”, “TABLE_NAME”).读文本属性 (“Value”, )
    调试输出 (XLS表名)  ' _xlnm#_FilterDatabase
    XLS表名 = 子文本替换 (XLS表名, “'”, , , , 真)
    XLS表名 = 子文本替换 (XLS表名, “$”, , , , 真)
    加入成员 (excel表名数组, XLS表名)
    rs.方法 (“MoveNext”, )
.判断循环尾 ()
rs.方法 (“Close”, )
conn.方法 (“Close”, )

注意:
连接字符串的问题。采用Microsoft.Jet.OleDb.4.0,可以读取excel2007以前的版本,在客户机上不需要部署office,采用Microsoft.Ace.OleDb.12.0的时候,需要安装引擎。

引擎下载地址:
http://download.microsoft.com/download/7/0/3/703ffbcb-dc0c-4e19-b0da-1463960fdcdb/AccessDatabaseEngine.exe







程序中读取Excel数据一般有两种连接方式:ODBC和OLEDB;
ODBC连接字符串:
Driver={Microsoft Excel Driver (*.xls)};DriverId=790;Dbq=C:\MyExcel.xls;DefaultDir=c:\mypath;
解释下 DriverId=790: 790是Microsoft   Excel   97这个驱动程序的整型标志符;
其他 驱动程序的整型标识符:  
      25   (Microsoft   Access)  
      21   (dBASE   III)  
      277   (dBASE   IV)  
      533   (dBASE   5.0)  
      534   (Microsoft   Excel   3.0)  
      278   (Microsoft   Excel   4.0)  
      22   (Microsoft   Excel   5.0/7.0)  
      790   (Microsoft   Excel   97)  
      26   (Paradox   3.x)  
      282   (Paradox   4.x)  
      538   (Paradox   5.x)  
      27   (Text)  
OLEDB连接字符串:    
Excel 97-2003都是用下面这个
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyExcel.xls;Extended Properties="Excel 8.0;HDR=Yes;IMEX=1";

Excel2007不再使用Jet,而是使用ACE,如下:
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\MyExcel.xlsx;Extended Properties=\"Excel 12.0 Xml;HDR=YES;IMEX=1\";
  重点提示!
双引号 " 需要在你的编程语言中进行字符转义处理
c#, c++   \"
VB6, VBScript   ""
xml (web.config 等)   "
或者使用 '
HDR=Yes,代表第一行是标题,不做为数据使用 ,如果用HDR=NO,则表示第一行不是标题,做为数据来使用。系统默认的是YES
"IMEX=1;" 通知驱动程序以文本格式读取混合型的列(如数字、日期、字符串等)。需要注意的是,这个选项可能会导致Excel文件的写入拒绝
SQL 语法 "SELECT [列名1], [列名12] FROM [Sheet1$]". 即Excel工作表名后加上"$",在"[ ]"内加入列名

检查本地注册表键值
   Excel97-2003:[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Excel]
   Excel2007:[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\12.0\Access Connectivity Engine\Engines\Excel]
找到其中的 "TypeGuessRows"(REG_DWORD数据类型)键。这个数值表示,决定ISAM驱动程序从前n条数据采样确定数据类型,默认为8,将这个值改成0,可以对所有行进行采样,不过性能开销很大。另请注意,有些时候,设置选项IMEX=1可能会导致IMEX驱动程序只进行8行采样。用IMEX=0代替可以确定注册表值TypeGuessRows=0起效

如果Excel设置了密码保护,将不能打文件开读取数据,哪怕是在连接字符串中配置了正确的密码,你会收到这样的错误信息 "Could not decrypt file"

   说一下 Extended Properties这几个Key是指什么:
   Excel8.0指Excel的驱动版本,从Excel97到2003都用这个,Excel2007中开始用Excel12.0;
HDR 有两个可选的值:Yes或者No,默认是Yes; 指是否需要列标题,Yes表示第一行当作列标题来处理,No则把第一行当作数据内容来处理;一般我们用到的导入导出的Excel都是有标题栏的,那就可以不写这个参数或者设为Yes。
IMEX有三个可选的值:0,1和2,默认是0; 微软是这样解释的:
        0 is Export mode    -------导出模式(从Excel文件读取数据时使用)
        1 is Import mode     -------导入模式(向Excel文件插入数据时使用)
        2 is Linked mode (full update capabilities)  -----Linked模式(需要完全更新Excel文件时使用)
这个值具体有啥影响呢?  
上传的Excel数据中如果既有数字型,又有文本型,则上传后读到DataTable中,发现文本的单元格都是空(有时是第一列的数字型值为空);尝试用模板文件来限定数据类型,根本不顶用!    
      使用Remark在Excel模板中标注,这个只能提醒User,但也不能保证User输入的结果啊!
      使用宏定义来强制转化类型,大多情况下,都是禁用宏的,客户端的事,更是难以控制,所以这个方法用在这里也不是最好的~!
所以,还是把解决问题的思路回归到Server端: 解决读不到混合格式的Excel数据的问题;      
        关于Excel中的数据类型缺省值,MS是这样说的:Excel 驱动程序读取指定源中一定数量的行(默认情况下为 8 行)以推测每列的数据类型。如果推测出列可能包含混合数据类型(尤其是混合了文本数据的数值数据时),驱动程序将决定采用占多数的数据类型,并对包含其他类型数据的单元返回空值。(如果各种数据类型的数量相当,则采用数值类型。)Excel 工作表中大部分单元格格式设置选项不会影响此数据类型判断。可以通过指定导入模式来修改 Excel 驱动程序的此行为。
简单点,其实对我们有用就是这样:IMEX=0的时候读取Excel中的数据时,它还是根据上述的默认8行规则来确定数据类型; IMEX设为1时,将把所有单元格数据都作为文本类型来处理; 当设置IMEX为2时,用来更新Excel中的数据用;
问题还没有结束!!  如果在前八行内的数据类型是数字型,且在第八行之后如果出现字符,则字符数据一样的读不到~!
这个问题需要修改注册表来解决:

将Server上注册表中的HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Excel\ 下的TypeGuessRows这个键值改为一个较大的数;  如果预估一次要上传的资料数量最大为1000的话,那就设为一个比1000稍大的值即可;(注:也不要改太大,因为太大会降低上传Excel时的性能;这个值最大可为65535,)

原因:读取Excel的Microsoft Jet4.0驱动默认按照前八行(标题行除外)来判断该列的数据类型,之前有微软有说法是在读取Excel的数据时,设置连接字符串的扩展参数IMEX=1 就会把混合类型的数据列当作文本来处理,但实际上效果并不完全是这样的;   即使设置了IMEX=1,或者把上传的Excel的列数据格式都设置为文本型,Jet驱动其实还是按照前八行来判断数据类型的,只有当前八行数据中出现既有文本型又有数字型(也即前八行为混合型数据),并设置IMEX=1时,该列数据才会当作文本来处理;  所以我们的解决办法就是把MS Jet这个定义的“8”这个值改大,这样当在第八行以后出现字符时,Jet驱动就会把这列值当作文本来处理,这样就能读到值了。

如此一来,只要设置IMEX=1,则任何在设置的这个值范围内的行如果出现混合类型的数据,都将会作为文本来处理,这样就能保证Jet驱动一定能读到Excel中的值(不是混合类型的列会不会读不到? 这点相信微软的实力,对同一类型的数据Jet是绝对能识别的;)
最后举一个取Excel中值的SQL语句的例子,如:select 姓名,年龄 from [Sheet1$],
"Sheet1"可换成你更改的当前Sheet页的名称,如:elect 姓名,年龄 from [学生名单$]



级别: 商业用户
发帖
117
铜币
259
威望
0
E积分
0
技术积分
0
只看该作者 5楼 发表于: 12-07
很详细了,这个是当初自己遇见问题网上找的资料,自己整理修改过保存下来的,应该可以完美解决你的问题
级别: 商业用户
发帖
1564
铜币
2143
威望
0
E积分
0
技术积分
0
只看该作者 6楼 发表于: 12-08
这么详细!太感动啊,谢谢。
级别: 幼儿园
发帖
26
铜币
0
威望
0
E积分
0
技术积分
0
只看该作者 7楼 发表于: 12-08

这么详细!太感动啊,谢谢。
快速回复

限60 字节
如果您提交过一次失败了,可以用”恢复数据”来恢复帖子内容
 
认证码:
上一个 下一个