Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 4182|回复: 18

[已解决]求助:sql在2003中可以但2007中出错

[复制链接]
发表于 2011-9-3 14:39 | 显示全部楼层 |阅读模式
大师,在论坛上找了个SQL语句,在2003中可运行,在2007中不能,错在那里啊
最佳答案
2011-9-4 17:44
syt188702 发表于 2011-9-4 15:46
回复 爱疯 的帖子

回老师,经过老师的解答并结合实践,我得出了一个结论,就是两表的字段名应该相同,是不 ...

不用这么叫,我也是来学习的。
sql我用得很少,很多不清楚,因为学习其他的贴,我觉得如你所说:select 后面的内容(表或表中的列标题),必须存在才行。
sql在2003中可以但2007中出错.JPG
发表于 2011-9-3 17:17 | 显示全部楼层
Open语句正确吗?可以录个宏看看

最好有个附件测试一下
回复

使用道具 举报

 楼主| 发表于 2011-9-3 18:48 | 显示全部楼层
回复 吕?布 的帖子

大师, Open语句是从网上找的,2003中使用的是一位论坛,高手的,读写修的帖子,修改的,因工作的需要、而VBA不懂,能使用一些简单函数,在某些方面2007的增强函数可以解决,如是就放弃使用2003,再从论坛中找大师们解答,做了一象人事系统一样的贷款明细帐,总是想精简他,但能力有限,只能从大师们发的帖中找,和请大师们帮助,昨天找的
回复

使用道具 举报

发表于 2011-9-3 22:31 | 显示全部楼层
本帖最后由 吕?布 于 2011-9-3 22:33 编辑

不管怎么来的,你把你在2007里出错的代码发附件上来
回复

使用道具 举报

发表于 2011-9-4 00:55 | 显示全部楼层
本帖最后由 adders 于 2011-9-3 21:27 编辑

回复 syt188702 的帖子

CoNN.Open后面,试试改为:

"Provider=Microsoft.ACE.OLEDB.12.0; Extended Properties=Excel 12.0; Data Source=" & StPath
回复

使用道具 举报

 楼主| 发表于 2011-9-4 07:03 | 显示全部楼层
回复 吕?布 的帖子

回老师,附件来了

测试sql excel2007.rar

391.23 KB, 下载次数: 8

回复

使用道具 举报

 楼主| 发表于 2011-9-4 07:12 | 显示全部楼层
回复 adders 的帖子

大师,修改后还是不行
sql在2003中可以但2007中出错1.JPG
回复

使用道具 举报

发表于 2011-9-4 08:08 | 显示全部楼层
  1. Sub 按钮_单击()
  2.     Dim conn As Object, rst As Object
  3.     Dim Stpath$, sql$
  4.    
  5.     Set conn = CreateObject("adodb.connection")    '建立ADO连接对象
  6.     Set rst = CreateObject("adodb.recordset")    '建立ADO记录集对象
  7.     conn.Open "provider=Microsoft.ACE.OLEDB.12.0;extended properties='excel 12.0;imex=1';data source=" & ThisWorkbook.Path & "\工作簿.xlsx"
  8.     sql = "select [现金流水$].贷款帐号 ,[数据表$].贷款单位,[数据表$].身份证号码, [数据表$].地址 from [现金流水$],[数据表$] where[现金流水$].贷款帐号=[数据表$].贷款帐号"
  9.     Range("A2:x10000").ClearContents
  10.     [a2].CopyFromRecordset conn.Execute(sql)
  11.     conn.Close
  12.     Set conn = Nothing
  13.     Set rst = Nothing
  14.     Application.ScreenUpdating = True
  15. End Sub
复制代码

照例子套的,不懂SQL
回复

使用道具 举报

 楼主| 发表于 2011-9-4 09:30 | 显示全部楼层
回复 爱疯 的帖子

回老师,还是第一张图片的问题
回复

使用道具 举报

 楼主| 发表于 2011-9-4 09:31 | 显示全部楼层
下的实列能用,增加数据新不能用了
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 19:08 , Processed in 0.830642 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表