使用oledb读写excel出现“操作必须使用一个可更新的查询”的解决
前两天使用oledb连接excel的办法为单位某部门从一个excel的多个sheet中作连选抽出需要的数据，程序非常简单，结果很快就出来，原来手工需要很长时间才能选出的结果现在几乎一点击就有了结果。使用人员非常满意，由于是多人使用，开始只是将结果显示在一个页面上。后来他们要求将结果写入该xls文件的另一个sheet中，我随便写了个语句以为可以立马搞掂，没想到居然出现了“操作必须使用一个可更新的查询”。因为读取结果正常，我开始以为是excel文件所处的文件夹没有写权限所致。增加了相应权限后，结果依然如故。没办法还是检查程序吧，仔细检查了一下，问题发现了，原来开始只是为了读取excel我将连接写成了如下格式：
Private filename As String=Server.MapPath(".")+"test.xls;Extended Properties='Excel8.0;HDR=yes;IMEX=1'"
Dim constr As String="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+filename
特别注意
Extended Properties='Excel8.0;HDR=yes;IMEX=1'
A：HDR(HeaDer Row)设置
若指定值为Yes，代表Excel档中的工作表第一行是栏位名称
若指定值為No，代表Excel档中的工作表第一行就是資料了，沒有栏位名称
B：IMEX(IMport EXport mode)设置
IMEX有三种模式，各自引起的读写行为也不同，容後再述：
0is Export mode
1is Import mode
2is 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='Excel8.0;HDR=yes;IMEX=2'"
Dim constr As String="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+filename
运行一切ok。