kill me heal me幻听mv:VB6.0使用ADO对象连接数据库

来源：百度文库 编辑：偶看新闻 时间：2024/04/27 22:13:03

VB6.0使用ADO对象连接数据库

发布时间：2008-04-03 10:45:19  来源：编程爱好者网站  作者：编程爱好者网站  点击：581

1． 定义连接对象

Global DBconnect As New ADODB.Connection

2． 执行连接语句

If DBconnect.State = adStateOpen And Not IsEmpty(adStateOpen) Then DBconnect.Close



l         连接ODBC

    DBconnect.ConnectionString = "dsn=DataAliasName;uid=UserID;pwd=Passwd;"

l         直接连接Access为

Dbconnect.Provider = "Microsoft.jet.OLEDB.4.0"  // Access Array7为3.51

DBconnect.ConnectionString = "FilePath＼FileName.mdb"

l         连接Oracle

DBconnect.Provider = "MSADORA"

DBconnect.ConnectionString = "user/mypass@servicename

l         连接SQL Server

DBconnect.Provider = "SQLOLEDB.1"

DBconnect.ConnectionString = "DATABASE= ;SERVER= ;UID= ;PWD= ;"

或者可以使用 DBconnect.Open "SERVER" , "USERID" , "PASSWORD"



DBConnect.Open

3． 取查询结果集

Global RS As New ADODB.Recordset

Global PS As New ADODB.Recordset

If RS.State = adStateOpen And Not IsEmpty(adStateOpen) Then RS.Close

     RS.Open SQLStr, DBconnect, adOpenKeyset

4． 执行SQL语句

DBconn.Execute SQLStr

5． 关闭数据库

DBconnect.Close
关于VB6使用ADO对象连接MySQL数据库的具体语句 VB6.0中ADO连接网络数据库应该怎么设置 vb6.0连接数据库语句 vb ado连接数据库 使用vb6.0中的ADO控件链接Access的问题 用ADO连接SQL数据库 vc用ADO连接数据库 ADO连接数据库登陆失败原因 在VB中用ADO控件连接数据库 VC+ADO+SQLServer连接数据库的语句 怎样才能在VB6.0 中连接Access 2003数据库 怎样才能在VB6.0 中连接Access 2003数据库 局域网中有vb6.0连接vf数据库 ADO对象? 怎样使用ADO对象模块的CONNECTION对象打开数据库连接 ADO.NET中几个数据库处理的核心对象 谁有关于vb6连接数据库书籍 我们使用connection对象______ 方法加上连接字符串就可连接数据库了. vb6.0 编程 数据库访问 如何实现VC++连接ADO数据库,进行远程数据库连接 怎么在c++builder中用ado连接sqlserver数据库 在VB 中如何用ADO连接数据库 谁能介绍一下ado.net连接数据库的优点？ 在VB中用ADO控件连接Access数据库