vb中adodb连接数据库,,VB语言使用ADO连接、操作SQLServer数据库教程

vb中adodb连接数据库,,VB语言使用ADO连接、操作SQLServer数据库教程

本文主要介绍VB语言使用ADO连接和操作SQLServer数据库的教程。本文讲解详细,代码中有大量注释,是非常好的教程。有需要的朋友可以参考一下。

前几年学的VB我都快忘光了,所以这几天复习了一下。连接VB ADO数据库不是很难。

连接第一步(要仔细看)

对于小白来说,这里的教程是最详细的。连接ADO数据库的第一步需要添加哪些组件?全名是Microsoft ado数据控件6.0 (sp6) (oledb)部分。

在Microsoft ADO Data Control 6.0(SP6)(OLEDB)部件中有一个名为Adodc的数据控件,应该添加它。在Adodc数据控件的数据位置找到了ACCES。

控件(值是指名称)

复制代码如下:

对于i=1至Adodc1。记录集

如果不是Adodc1。Recordset.EOF然后

combo 1 . additemaddc1 . recordset . fields(' Value ')。价值

Adodc1。Recordset.Movenext

如果…就会结束

接下来我

这个代码参考的作者是ydl890406 Da。我在VB群里写这个东西的时候,借的。后来发现错误很多。被Y大神修改了几次,还是有错误,我就干脆重写了。这是后来的代码。时间过得很快,VB团解散了。后来因为某种原因,现在很多教程都在用这段代码。

第二部分是AOD的语码连接。由于第二部分涉及到记录集对象和连接对象,可以自己学习,自己写。

什么是记录集对象和连接对象?Connection对象是到数据源的连接,Recordset对象是操作数据。

查找Microsoft ado数据控件6.0 (sp6) (oledb)部件。

用VB ADO连接SQLServer数据库

数据源信息常数

public Const conn As String=' Provider=SQL oledb . 1;密码=saUserID=sa初始目录=学生文件;“数据源=本地主机”

Public Const CONNECT_LOOP_MAX=10 '执行连接操作时可以访问数据库的次数。

“Private IsConnect As Boolean”标记数据库是否已连接

' Private _ num as integer '标记在执行Connect()函数后数据被访问的次数。

Privateas addodb。“连接”连接数据库的连接对象。

私有as添加odb。“记录集”保存结果集的记录集对象。

//连接到数据库

专用子连接()

如果连接标志为真,则返回。

如果IsConnect=True,则

出口接头

如果…就会结束

设置cnn=New ADODB。“连接”键new用于创建新对象cnn。

cnn。连接字符串=连接

cnn。打开

确定连接的状态。

如果cnn。那就开放吧

MsgBox '数据库连接失败'

结束

如果…就会结束

设置连接ID以表明您已连接到数据库。

IsConnect=True

末端接头

断开与数据库的连接。

专用子断开()

Dim rc一样长

如果IsConnect=False,则

出口接头

如果…就会结束

关闭连接

cnn。关闭

发布cnn

设置cnn=无

IsConnect=False

末端接头

使用Connect_Num控制数据连接。

公共Sub DB_Connect()

连接数量=连接数量1

连接

末端接头

使用Connect_Num控制数据断开。

Public Sub DB_Disconnect()

如果连接数量=连接循环最大值,则

Connect_Num=0

拆开

如果…就会结束

末端接头

强行关闭api访问俄语数据库,计数器复位。

Public Sub DBapi_Disconnect()

Connect_Num=0

拆开

末端接头

执行数据库操作的语言。

Byval是通过参数的值来传递的,参数在重传的过程中不会改变(即参数值传递给过程而不是地址的方式,使得过程访问的是发送变量的副本,过程无法改变变量的值);

与之对应的是byref,是指根据参数的地址来传递值。byref可以省略。

public Sub SQLExt(ByVal TmpSQLstmt作为字符串)

Dim cmd作为新的ADODB。“命令”创建命令对象cmd

' DB_Connect '连接到数据库

设置cmd。“ActiveConnection=cnn”设置cmd的ActiveConnect属性,并指定与之关联的数据库连接。

敕令书' CommandText=TmpSQLstmt '设置要执行的命令文本。

MsgBox TmpSQLstmt

敕令书“执行”执行命令。

设置cmd=Nothing

' DB_DisConnect '与数据库断开连接

末端接头

执行数据库查询语句。

公共函数查询扩展(ByVal TmpSQLstmt作为字符串)作为ADODB .记录集

暗淡rst作为新ADODB .'记录集'创建记录集对象英特尔的快速储存技术

'数据库连接'连接数据库

设置rst .ActiveConnection=cnn '设置英特尔的快速储存技术的主动连接属性,指定与其相关的数据库的连接

rst .' CursorType=adOpenDynamic '设置游标类型

rst .' LockType=adLockOptimistic '设置锁定类型

rst .'打开' TmpSQLstmt '打开记录集

' Set QueryExt=rst '返回记录集

结束功能

郑重声明:本文由网友发布,不代表盛行IT的观点,版权归原作者所有,仅为传播更多信息之目的,如有侵权请联系,我们将第一时间修改或删除,多谢。

相关文章阅读

  • 使用sql语句实现查询排序,顺序和倒序的区别,sql按倒序排序
  • 使用sql语句实现查询排序,顺序和倒序的区别,sql按倒序排序,使用SQL语句实现查询排序,顺序和倒序
  • 使用php连接mysql数据库,php连接数据库的方法
  • 使用php连接mysql数据库,php连接数据库的方法,一文详解PHP连接MySQL数据库的三种方式
  • 一篇文章带你入门sql编程语句,一篇文章带你入门sql编程题
  • 一篇文章带你入门sql编程语句,一篇文章带你入门sql编程题,一篇文章带你入门SQL编程
  • window无法启动mysql 1067,windows无法启动mysql57服务,错误1053
  • window无法启动mysql 1067,windows无法启动mysql57服务,错误1053,windows无法启动MySQL服务报错1067的解决方法
  • sql重复记录查询的几种方法有哪些,查询重复记录sql语句
  • sql重复记录查询的几种方法有哪些,查询重复记录sql语句,SQL重复记录查询的几种方法
  • sql语句的各个关键字的解析过程详细总结怎么写,sql语句的各个关键字的解析过程详细总结图
  • sql语句的各个关键字的解析过程详细总结怎么写,sql语句的各个关键字的解析过程详细总结图,SQL语句的各个关键字的解析过程详细总结
  • sql语句游标,sqlserver游标的使用
  • sql语句游标,sqlserver游标的使用,详解SQL游标的用法
  • sql语句比较时间大小,sql 时间比较大小
  • 留言与评论(共有 条评论)
       
    验证码: