'1 怎么样才能操作数据库?
'使用ADO建立和数据库的连接,然后用ADO对象和sql语言对数据库进行操作。
'2 SQL是什么?
'SQL(Structured Query Language)是一种查询语言,可以查询、更新数据库中的数据。
'3 SQL可以查询哪些数据库?
'SQL是一种通用的查询语言,可以查询EXCEL,ACCESS,SQL SERVER等各种数据库
'4 ADO是什么?
'ADO是新的数据库存取技术,可以建立与各数据库库的连接,也可以对数据库数据进行添加、更新、删除等操作
'5 我们学习SQL+ADO访问数据库有什么用处?
'1 可以在不打开EXCEL文件的情况下,从文件中提取数据.
'2 可以从建立连接的专业软件数据库中提取数据.如财务软件等.
'6 怎么使用ADO?
'引用法
'工具--引用---Microsoft Activex..D...O"
'引用后再声明: Dim conn As New Connection 声明链接对象
' Dim rst As New Recordset 声明记录集对象
'创建法
'使用CreateObject函数创建
'Set conn = CreateObject("adodb.connection") '创建ado对象
'Set rst = CreateObject("ADODB.recordset") '创建记录集
'一、Connection对象
'1 建立和数据库的连接
'.Open
' Dim conn As New Connection
' conn.Open "provider=microsoft.jet.oledb.4.0;extended properties=excel 8.0;data source=" & ThisWorkbook.Path & "/Database/exceldata.xls"
'Conn.Open:打开数据库的连接
'provider=microsoft.jet.oledb.4.0 数据库引擎版本
'extended properties=excel 8.0 连接的是Excel8.0版本(excel2000以后的版本),Excel不是标准的数据库格式,所以要设置扩展属性
'data source=" & ThisWorkbook.Path & "/数据库.xls" 数据库路径
'************以下是连接其他数据库或文件的字符串表达式*********************************
'1 Mysql数据库
'strDriver = "Provider=SQLOLEDB;DataSource=" & Path & ";Initial Catolog=" & strDataName
'2 TXT文件
'strDriver = "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties='text;IMEX=1;HDR=NO;FMT=Delimited;';Data Source=" & Path
'3 MSSQL数据库
'strDriver = "Provider=MSDASQL;Driver={SQL Server};Server=" & Path & ";Database=" & strDataName
'4 Oracle数据库
'strDriver= "Provider=madaora;Data Source=MyOracleDB; User Id=UserID; Password=Password"
'2 执行sql语句
'.Execute SQL
'增加新表格:.Execute "Create 表格名 字段和属性"
'增加新记录:.Execute "Insert into 表名 (字段1, 字段2,... 字段n) VALUES(值1,值2,... 值n)"
'删除记录: .Execute "Delete from 表名 where 条件
'修改旧记录:.Execute "Update 表名称 SET 列1 = 新值,列2=新值 WHERE 列名称 = 某值
'筛选记录: .Execute "Select 字段 from 表 where 条件
'二、Recordset对象
'作用 打开记录集操作记录
'1 打开游标(记录集)
'rst.Open sql或command语句等,已打开的conn链接,
'2 添加新记录
'AddNew 单个字段或数组,单个值或数组
'或
' rst.AddNew '添加新的记录
' rst.Fields("姓名") = "伍天明" 'Fields("字段名")表示某列的记录
' rst.Fields("年龄") = 28
' rst.Fields("性别") = "男"
' rst.Update '添加记录后要更新
'3 修改记录
'rst.Update 字段数组, 值或数组
'4 删除记录
'rst.delete
'5 在记录中循环
'BOF 在记录的最前面
'EOF 在记录的结尾
'GetRows(默认值-1,Start, 字段)'Start 0从当前记录开始,1从第一条记录,2从最后一条记录开始
该 ISAM 不支持在链接表中删除数据。excel数据库只能添加查找修改,不能删除
https://blog.csdn.net/testcs_dn/article/details/46966809