高分悬赏，解决问题立即结贴。

[tatty_bad]

Update a set a.a17 = b.a17,a.a18 = b.a18,a.a19 = b.a19,a.a20 = b.a20 from [TableB] a inner join [Excel 8.0;DATABASE=C:\DD.xls;HDR=YES;IMEX=1].[Sheet1$A7:BC100] b on a.a1 = b.a1 and a.a4 = b.a4 and a.a7 = b.a7 and a.a11 = b.a11 and b.AID = 1

把Excel中从第7行开始到最后一行的数据，更新到Access表里面去。


Update [TableB] a inner join [Excel 8.0;DATABASE=" & ThisWorkbook.FullName & ";HDR=YES;IMEX=1].[" & WorkBookName & "$A7:BC" & ynum & "] b on a.a1 = b.a1 and a.a4 = b.a4 and a.a7 = b.a7 and a.a11 = b.a11 and b.AID = " & CustId & " set a.a17 = b.a17,a.a18 = b.a18,a.a19 = b.a19,a.a20 = b.a20

上面这句，我曾经在前两天执行成功过。但是今天不知道为什么，提示我：

运行时错误：-2147214900（80040e14）
不支持连接表达式

请高手帮我把这句话修改一下。

成功了立即结贴。

[lifeiping]

可能是数据库(80040e14/内存溢出)

[ouyang156]

先帮顶

[lff642]

顶顶....

[tatty_bad]

[Quote=引用 10 楼 Garnett_KG 的回复:]
前两天执行成功过?
你再看下你的Excel档是不是有些数据有问题呢?
[/Quote]

我没有办法去要求Excel的文档格式的
应该说，要完全兼容，向Excel兼容。

[zhiguo2008]

友情帮顶

[tatty_bad]

我现在的做法是先用VBA把数据读出来，然后循环写入Access

速度有点影响，总的来说还可以

没有更好的办法之前，只能这样了

[happysophie]

不可能完成的任务。
SQL的限定非常严格，EXCEL表中数据有一点点不对，导入数据就不能实现。
我从来就不主张用户在excel表输入数据，然后导入sql，很可能非常容易出问题。还可能是千奇百怪的问题，是咱们会电脑的人都想不到的问题！

我领导说了，不能被用户牵着鼻子走，得是你要求用户去怎么做！

[wwd252]

帮顶

[tatty_bad]

[Quote=引用 17 楼 happysophie 的回复:]
不可能完成的任务。
SQL的限定非常严格，EXCEL表中数据有一点点不对，导入数据就不能实现。
我从来就不主张用户在excel表输入数据，然后导入sql，很可能非常容易出问题。还可能是千奇百怪的问题，是咱们会电脑的人都想不到的问题！

我领导说了，不能被用户牵着鼻子走，得是你要求用户去怎么做！
[/Quote]

无语，这是不可能的。
以客户为主导。。。

[ws_hgo]

学习一下............

[hery2002]

[Quote=引用 17 楼 happysophie 的回复:]
我领导说了，不能被用户牵着鼻子走，得是你要求用户去怎么做！
[/Quote]
我怎么没有遇到这么好的领导哦~

[-狙击手-]

--try


update a
set a.a17 = b.a17,a.a18 = b.a18,a.a19 = b.a19,a.a20 = b.a20
from ta a left join openrowset('MICROSOFT.JET.OLEDB.4.0','Excel 5.0;HDR=YES;DATABASE=c:\DD.xls','select * from [sheet1$A7:BC100]') b
on a.a1 = b.a1 and a.a4 = b.a4 and a.a7 = b.a7 and a.a11 = b.a11 and b.AID = 1

[microd]

有可能是你的EXCEL 文件中的字段值有问题

[ChinaITOldMan]

up!

[tatty_bad]

哈哈，这样的领导就是自己。。。

[raul17282]

execl关闭了吗？

[让你望见影子的墙]

面这句，我曾经在前两天执行成功过。但是今天不知道为什么，提示我：

运行时错误：-2147214900（80040e14）
不支持连接表达式

看看里面的数据是不是有不和规范的数据?

[tianhuo_soft]

[Quote=引用 21 楼 hery2002 的回复:]
引用 17 楼 happysophie 的回复:
我领导说了，不能被用户牵着鼻子走，得是你要求用户去怎么做！

我怎么没有遇到这么好的领导哦~
[/Quote]

我也没遇到过

[wwwtyb]

[Quote=引用 26 楼 tianhuo_soft 的回复:]
引用 21 楼 hery2002 的回复:
引用 17 楼 happysophie 的回复:
我领导说了，不能被用户牵着鼻子走，得是你要求用户去怎么做！

我怎么没有遇到这么好的领导哦~


我也没遇到过
[/Quote]

传说中也没有听过

[happysophie]

我还是认为编写程序的人不是无所不能的。如果你对用户没要求，那么就永远完成不了用户的需求，那么就永远得不到用户的信任。
我单位的商业数据库，如果灌入数据，必须严格按照说明书给定的格式才可以。如果大家认为自己比国外的专门的程序员水平还高的话，可以任由用户输入数据，后果自己承担！

如果一定得在excel输入数据，那么你考虑用VBA对用户的输入行为做一个限制吧。如果用户输入错误，那么就用VBA提示用户输入正确的数据。