[转自] http://blog.csdn.net/iamlaosong/article/details/18043433 作者:iamlaosong ▲连接Oracle数据库 Set cnn = CreateObject("ADODB.Connection")     cnn.Open "Provider=msdaora;Data Source=dl580;User Id=emssxjk;Password=emssxjk;" dl580是tnsnames.ora中

ADODB.recordset ..\source\rtl\win\Winapi.ADOInt.pas..\17.0\OCX\Servers\ADODB2010.pasCLASS_Recordset: TGUID = '{00000535-0000-0010-8000-00AA006D2EA4}'; class function CoRecordset.Create: _Recordset; begin Result := CreateComObject(CLASS_Recordset) as

为了更精确地跟踪数据,要用RecordSet组件创建包括数据的游标,游标就是储存在内存中的数据: rs = Server.CreateObject("ADODB.RecordSet") rs.Open(sqlStr,conn,1,A) 注:A=1表示读取数据:A=3表示新增.改动或删除数据. 在RecordSet组件中,经常使用的属性和方法有: rs.Fields.Count:RecordSet对象字段数. rs(i).Name:第i个字段的名称,i为0至rs.Fields.Count

1.数据库连接对象(ADODB. Connection)该对象用于与ODBC数据库建立连接,所有对数据库的操作均通过该连接进行.数据库连接对象ADODB. Connection的作用象Delphi中的TDatabase对象.建立一个连接对象的方法为(AConnection为Variant类型变量): AConnection:=CreateOleObject('A DODB.Connection') 用于建立连接的方法为Open,使用语法为(以对象AConnection为例):AConnectio

rs = Server.CreateObject("ADODB.RecordSet") rs.Open(sqlStr,conn,1,A) 注:A=1表示读取数据:A=3表示新增.修改或删除数据. 在RecordSet组件中,常用的属性和方法有: rs.Fields.Count:RecordSet对象字段数. rs(i).Name:第i个字段的名称,i为0至rs.Fields.Count-1 rs(i):第i个字段的数据,i为0至rs.Fields.Count-1 rs("字段

解决方法: 菜单-工程-引用Microsoft ActiveX Data Objects 2.x Library 定位……msado15.dll

转自网友,看着挺全就转了,供大家学习研究. Recordset 对象的属性 1.CursorType 属性 AdOpenForwardOnly: 仅向前游标,默认值.除了只能在记录中向前滚动外,与静态游标相同.当只需要在记录集中单向移动时,使用它可提高性能.(顾名思义,这种游标只能向前移动.然而,由于这种游标功能有限,将它用于系统资源时是非常有效的.) AdOpenKeyset: 键集游标.尽管从您的记录集不能访问其他用户删除的记录,但除无法查看其他用户添加的记录外,键集游标与动态游标相似.仍然

在Excle中有两种引用方式,例如:第一行第一列的单元格可以是:A1  也可以是R1C1 切换引用样式的代码如下: Sub 切换引用样式() Application.ReferenceStyle = xlR1C1 '切换为A1样式 MsgBox "已经切换为R1C1样式!" Application.ReferenceStyle = xlA1 '切换为R1C1样式 MsgBox "已经切换为A1样式!" End Sub 执行效果如下: 附件下载

文件系统对象相关: ("SCRIPTING.FILESYSTEMOBJECT") 字典相关: ("SCRIPTING.DICTIONARY") 脚本外壳相关: ("WSCRIPT.SHELL") WINDOWS外壳相关: ("SHELL.APPLICATION") 正则表达式相关: ("VBSCRIPT.REGEXP") ASP相关: ("MSWC.ADROTATOR") ("

本文参考[东围居士]的cnblog博文  Excel.VBA与MySQL交互  在自己机器上调试成功,把调试中遇到的问题一并写出了. 本文主要涉及: VBA中的MySQL环境配置 VBA连接MySQL数据库 VBA读写MySQL数据 在Excel中连接MySQL数据库及数据读写 系统环境: Windows 7 64bit Excel 2016 32bit WAMP(3.0.6 32bit)集成的MySQL版本为5.7.14 1. VBA连接MySQL前的环境配置 如果想连接本地数据库,必须先安装

本文主要涉及: VBA中的MySQL环境配置 VBA连接MySQL数据库 VBA读写MySQL数据 在Excel中连接MySQL数据库及数据读写 系统环境: Windows 10 Excel 2013 XAMPP.其中集成的数据库是MariaDB 10.1.13(如果不懂MariaDB为何物,可把它当成是MySQL.事实上它的使用和MySQL也几乎完全一致) 1. VBA连接MySQL前的环境配置 系统中必须先安装有MySQL服务,这个就不多说了.可以选择使用官方安装包,或者使用PHP集成环境中

首先说明以下. 第一: 下面的 “ _" 也就是 空格下划线 在VBA中表示换行的意思:& 表示链接连个字符串的操作,注意 & 的前后是否需要空格 第二: 如果链接服务器,服务器名称,账号,密码,或者SQL语句有问题,都会报错说自动化错误. 第三: 如果刚开始运行程序就显示”未定义对象错误“,那么你就需要 VBA界面的”工程--引用“中选择”Micsoft ActiveX data Objects 2.6“ 点击确定.   Sub 下载数据() Dim lastRow As Lo

编写Excel VBA工具,连接并操作Mysql 数据库. 系统环境: OS:Win7 64位 英文版 Office 2010 32位 英文版 1.VBA连接MySql前的准备 Tools--->References..---->引用 勾选Microsoft ActiveX Data Objects 2.8 Librarys 和Microsoft ActiveX Data Objects Recordset 2.8 Librarys 2.安装Mysql ODBC连接服务 下载连接:https:

工作中经常要从数据库把数据跑出来放到EXCEL上,才能进行下一步的操作,那么VBA如何结合SQL提取数据呢?答案就是ADO. 声明和实例变量 引用法——引用Microsoft ActiveX Data Objects x.x Library,Microsoft ActiveX Data Objects Recordset x.x Library,声明的同时使用New实现了初始实例化 Dim conn as New Connection Dim rre as New Recordset 创建法——

本文主要涉及: VBA中的SQL Server环境配置 VBA连接SQL Server数据库 VBA读写SQL Server数据 如何安装SQL Client 系统环境: Windows 7 64bit Excel 2016 64bit 1. VBA连接SQL Server前的环境配置 在Excel这边,需要先在VBE中启动数据库连接支持.按下Alt+F11打开VBE,在菜单栏选择“工具”-“引用”,在弹出的引用窗口中,找到"Microsoft ActiveX Data Objects 6.1

前期绑定,要先添加引用---"Microsoft ActiveX Data Objects 6.1" ADO学习的权威参考可点击:w3school ADO简单理解:是几个ActiveX对象(类),用于数据(Data)访问. Connection:ADO Connection 对象用于创建一个到达某个数据源的开放连接.通过此连接,可以对一个数据库进行访问和操作. Command:ADO Command 对象用于执行面向数据库的一次简单查询.此查询可执行诸如增删查改等动作.        

  读取MS SQL Server数据表数据,并将它保存到excel工作表中 Sub ReturnSQLrecord() 'sht 为excel工作表对象变量,指向某一工作表 Dim i As Integer, sht As Worksheet '定义数据链接对象 ,保存连接数据库信息 '使用ADODB,须在菜单的Tools->References中添加引用“Microsoft ActiveX Data Objects library 2.x” Dim cn As New ADODB.Conne

EXCEL版本2010, 引用 Private Sub CommandButton1_Click() Dim conn As New ADODB.Connection Dim rs As New ADODB.Recordset Set Cnn = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") Dim connstr Dim sql Dim bt Dim et Dim

在敲学生信息管理系统的时候,通过查阅了解了一些关于 ADO / ADODB / ADODC / 的简单描述,想想将他们对 比着总结一下更容易理解记忆.尽管都是一些浅显的东西,不过对像我这样的菜鸟们还是有点用的. ADO(ActiveX Data Objects) 一种程序对象,用于表示用户数据库中的数据结构和所包含的数据.在Microsoft Visual Basic编辑器中,可以使 用ADO对象以及ADO的附加组件(称为Microsoft ADO Extensions for DLL and

最近车间制造部有需求,需要通过excel填写的ID获取数据库中的某个取值.研究了一下VBA,简要记录一下代码,仅供参考. Function GETPMAX(SID As String) As String Dim result As String '链接数据库 Set Cnn = CreateObject("ADODB.Connection") Set rt = CreateObject("ADODB.Recordset") Cnn.ConnectionString