用oledb读写excel出现“操作必须使用一个可更新的查询”的解决办法

http://hi.baidu.com/ahbzhehu/blog/item/7928c1d072b06487a0ec9ca8.html

出现了“操作必须使用一个可更新的查询”。因为读取结果正常，开始以为是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。