• ado.net 操作excel 问题记录 操作必须使用一个可更新的查询


    前两天使用oledb连接excel的办法为单位某部门从一个excel的多个sheet中作连选抽出需要的数据,程序非常简单,结果很快就出来,原来手工需要很长时间才能选出的结果现在几乎一点击就有了结果。使用人员非常满意,由于是多人使用,开始只是将结果显示在一个页面上。后来他们要求将结果写入该xls文件的另一个sheet中,我随便写了个语句以为可以立马搞掂,没想到居然出现了“操作必须使用一个可更新的查询”。因为读取结果正常,我开始以为是excel文件所处的文件夹没有写权限所致。增加了相应权限后,结果依然如故。没办法还是检查程序吧,仔细检查了一下,问题发现了,原来开始只是为了读取excel我将连接写成了如下格式:

    Private filename As String = Server.MapPath(".") + "test.xls;Extended Properties='Excel 8.0;HDR=yes;IMEX=1'"
      Dim constr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + filename

      特别注意

      Extended Properties='Excel 8.0;HDR=yes;IMEX=1'

      A: HDR ( HeaDer Row )设置

      若指定值为Yes,代表 Excel 档中的工作表第一行是栏位名称

      若指定值為 No,代表 Excel 档中的工作表第一行就是資料了,沒有栏位名称

      B:IMEX ( IMport EXport mode )设置

      IMEX 有三种模式,各自引起的读写行为也不同,容後再述:

      0 is Export mode

      1 is Import mode

      2 is Linked mode (full update capabilities)

      我这里特别要说明的就是 IMEX 参数了,因为不同的模式代表著不同的读写行为:

      当IMEX=0 时为“汇出模式”,这个模式开启的 Excel 档案只能用来做“写入”用途。

      当 IMEX=1 时为“汇入模式”,这个模式开启的 Excel 档案只能用来做“读取”用途。

      当 IMEX=2 时为“连結模式”,这个模式开启的 Excel 档案可同时支援“读取”与“写入”用途。

      看完这些大家就不用再说我的写如为什么有问题了吧。我将连接改为如下:

    Private filename As String = Server.MapPath(".") + "test.xls;Extended Properties='Excel 8.0;HDR=yes;IMEX=2'"
      Dim constr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + filename

      运行一切ok。

  • 相关阅读:
    PYTHON压平嵌套列表
    linux下IPTABLES配置详解
    Python面试必须要看的15个问题
    两个实用的Python的装饰器
    Python的16个“坑”
    python实现不可修改的常量
    51nod-1322: 关于树的函数
    51nod-1310: Chandrima and XOR
    51nod-1296: 有限制的排列
    51nod-1277: 字符串中的最大值
  • 原文地址:https://www.cnblogs.com/heimirror/p/1645852.html
Copyright © 2020-2023  润新知