VB访问MySQL数据库的实现与源码

最新推荐文章于 2021-07-03 15:37:53 发布

sbtdkj1017

最新推荐文章于 2021-07-03 15:37:53 发布

阅读量1w

点赞数

文章标签： mysql vb 数据库 server database command

本文链接：https://blog.csdn.net/sbtdkj1017/article/details/1878915

版权

本文介绍了如何在VB中利用ADO数据控件和MyODBC驱动连接MySQL数据库。通过创建ODBC数据源，设置Connection字符串，并使用ADODB的Command对象和RecordSet对象执行SQL查询和获取结果。示例代码展示了连接数据库、查询数据和创建表的操作。遇到连接问题时，可尝试使用服务器IP替换localhost。

摘要由CSDN通过智能技术生成

在VB中可以使用ADO数据控件实现对MySQL数据库的访问，但ADO控件不能直接访问MySQL，需要安装MyODBC(可以在网上下载)并在ODBC中注册一个用户DSN(控制面板/管理工具/数据源)，这样就能使VB顺利连接到MySQL数据库了。连接上了还需要执行SQL查询操作并能取得查询结果，可以使用ADODB的Command对象和RecordSet对像。实现VB对MySQL的访问的具体代码如下：
Private Sub connect_Click()
    Dim conn As New ADODB.Connection
    Dim cmd As New ADODB.Command
    Dim rs As New ADODB.Recordset
    'connect to MySQL server using MySQL ODBC 3.51 Driver
    conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" & _
    "SERVER=localhost;" & _
    "DATABASE=bs;" & _
    "UID=root;PWD=;OPTION=3"
    conn.Open
    cmd.CommandText = "select * from student"
    cmd.ActiveConnection = conn
    rs.CursorLocation = adUseClient
    rs.Open cmd, , adOpenStatic, adLockBa