excel连接外部数据库

1、Excel中ADO连接几种数据库的格式及字符串拼写方法ADO参考摘要：在OLE DB（建立于低层 ODBC 之上，是一个针对 SQL数据源和非SQL数据源，如邮 件和目录等进行操作的应用程序接口）的基础上，Microsoft推岀了另一个数据访问对象模型：ADO（ActiveX DataObject : ActiveX 数据对象）。ADO 采用基于 DAO 和RDO 的对象，并提供比DAO 和RDO 更简单的对象模型，它包含一些简化对数据存储区数据的访问任务的内置对象。同时ADO具有强大的功能和灵活性，它可以使用相同的编程模式连接到不同的数据库，为我们提供了数据库访问接口。ADO对象ADO 模型

2、中定义了六个常用的对象：Conn ection 、Comma nd 、Recordset 、Error、Field和Parameter 对象，通过这些对象的属性和方法，我们可以很方便地建立数据库连接，执行SQL查询以及存取操作。下图直观地描述了对象之间的关系：Conn ection对象的集合、方法、和属性执行下列操、ConnectionTimeout和Mode 属性对连接进行Connection 对象代表打开的、与数据源的连接。一般使用作：1、在打开连接前使用Conn ectio nStr ing配置。2、 使用DefaultDatabase属性设置连接的默认数据库3、 使用Provider属

3、性指定OLE DB提供者。4、 使用 Ope n方法建立到数据源的物理连接。使用Close方法将其断开。5、 使用Execute方法执行对连接的命令，并使用CommandTimeout属性对执行进行配置。6、 使用 BeginTrans 、CommitTrans和 RollbackTrans方法以及 Attributes属性管理打开的连接上的事务（如果提供者支持则包括嵌套的事务）。7、 使用Errors集合检查数据源返回的错误。Comma nd对象定义了对数据源执行的命令，我们可以使用Comma nd对象的集合、方法、属性进行下列操作：1、 使用CommandText属性定义命令（例如，SQL

4、语句）的可执行文本。2、 通过Parameter 对象和 Parameters集合定义参数化查询或存储过程参数。3、 使用Execute 方法执行命令并在适当的时候返回Recordset 对象。4、 执行前使用 Comma ndType属性指定命令类型以优化性能。5、 使用Comma ndTimeout属性设置等待命令执行的秒数。6、 通过设置 ActiveCo nn ection属性关联打开的连接。7、设置Name 属性将Comma nd 标识为与 Co nn ection 对象关联的方法。8、将Comma nd 对象传送给 Recordset 的Source 属性以便获取数据。Record

5、set 对象执行命令返回的记录集。任何时候，Recordset对象所指的当前记录均为集合内的单个记录。通过Recordset对象可对几乎所有数据进行操作。它由记录（行）和字段（列）构成。ADO 连接 EXCEL2003 表Conn.Open provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;datasource= &文件全路Cnn. Ope n provider=microsoft.jet.oledb.4.0;Exte nded properties=excel8.0;hdr=n o;data source= &路径设

6、置“ HDR=NO应该表示所选区域首行不做为标题，如果不设置该项，系统默认将首行非空记 录做为ADO记录集的标题行ADO连接txt文件ActiveSheet.Cells.ClearmyText =学生成绩.txtmyPath = ThisWorkbook.PathCnnStr = Driver=Microsoft Text Driver （*txt; *csv）; & DBQ= & myPath Cnn .Ope n Cnn Strrs.Ope n myText, cnn, adope nkeset, adLockOptimisticADO连接ACCESS2003 的数据库strAccess

7、= Provider=Microsoft.Jet.OLEDB.4.0;Data Source= + _数据库档案.MDB + _;Jet OLEDB:Database Password= & 123定义连接字符串数据源 密码（最长20个字符）Set ADOcn = New ADODB.Connection赋值变量为对象引用ADOc n.Ope n strAccess打开连接ADO连接FOXPRO 6.0 的数据库set conn =createobject(adodb.c onn ecti on)set rs=createobject(adodb.recordset)sql=select *

8、from aa.dbfconn. ope n driver=microsoft visual foxprodriver ;sourcetype=dbf;excelusive=no ;sourcedb= &文件路径rs.ope n sql ,connmsgbox rs.recordcou ntrs.closeconn .closeconn=nothingrs=nothing需要安装foxpro 的odbc驱动ADO连接SQL SERVER 的数据库Dim cnnl As ADODB.Co nn ectionDim strCnn As String打开连接。strC nn = Provider=s

9、qloledb; & _Data Source=srv;lnitial Catalog=pubs;User Id=sa;Password=;cnn I.Ope n strC nnADO连接ACCESS2007的数据库数据数据源con .Open Provider=Microsoft.ACE.OLEDB.12.0;Data Source= & Access2007 源& _;Jet OLEDB:Database Password= &密码con .Open Provider=Microsoft.ACE.OLEDB.12.0;Data Source= & Excel2007& _;Jet OLED

10、B:Database Password= &密码ADO连接oracle 数据库Sub connect. 数据库()Dim strc onnt As StringSet c onnt = New ADODB.Co nn ectionDim rs As ObjectSet rs = New ADODB.RecordsetDim sevip, Db, user, pwd As String设服务器地址、所连数据，及登录用户密码 sevip =Db =*“user = *pwd = *strc onnt = DRIVER=Microsoft ODBC for Oracle;Password=apps;

11、UserID=apps;Data Source=democonn t.C onn ecti on Stri ng = strc onntconn t.Ope nEnd SubADO连接mysql 数据库Sub connect. 数据库（）Dim strc onnt As Str ingstrc onnt =Set connt = New ADODB.Co nn ectionDim rs As ObjectSet rs = New ADODB.RecordsetDim sevip, Db, user, pwd As Str ing设服务器地址、所连数据，及登录用户密码sevip = 192.16

12、8.*& sevip &pwd = *strc onnt = DRIVER=MySqlODBC 3.51 Driver;SERVER=;Database= & Db & ;Uid= & user & ;Pwd= & pwd & ;Stmt=set names GBK conn t.C onn ecti on Str ing = strc onntconn t.Ope nEnd Sub与其说人的一生是同命运抗争，与性格妥协，不如说是与自己抗争，与自己妥协。人最终要寻找的，就是最爱的那个自己。只是这个自己，有人终其一生也未找到；有人只揭开了冰山的一角，有人有幸会晤一次，却已用尽一生。人生最难抵达的

13、其实就是自己。我不敢恭维我所有的自己都是美好的，因为总有个对抗的声音：你还没有这样的底气。”很惭愧，坦白说，自己就是这个样子：卑微过，像一棵草，像一只蚁，甚至像一粒土块，但拒绝猥琐！懦弱过，像掉落下来的果实，被人掸掉的灰尘，但拒绝屈膝，宁可以卵击石，以渺小决战强大。自私过，比如遇到喜欢的人或物，也想不择手段，据为己有。贪婪过，比如面对名利、金钱、豪宅名车，风花雪月，也会心旌摇摇，浮想联翩。倔强过，比如面对误解、轻蔑，有泪也待到无人处再流，有委屈也不诉说，不申辩，直到做好，给自己证明，给自己看！温柔过，当爱如春风袭来，当情如花朵芳醇，黄昏月下，你侬我侬。强大过，内刚外柔，和风雨搏击，和坎坷宣战，不失初心，不忘梦想，虽败犹荣。这样的自己一个个站到镜中来，千面万孔。有的隐着，有的浮着，有的张扬，有的压抑，有的狂狷，有的沉寂，有的暴躁，有的温良庸俗的自己，逐流的自己，又兼点若仙的自己，美的自己，丑的自己，千篇一律的自己，独一无二的自己。我们总想寻一座庙宇，来安放尘世的疲惫，寻一种宗教，来稀释灵魂里的荒凉。到头来，却发现，苦苦向往的湖光山色，原来一直在自己的心里，我就是自己的庙宇，我就是自己的