VB6.0通过MySQL Connector/ODBC连接MySQL
在 Visual Basic 6.0 中连接到 MySQL 数据库需要使用适当的数据库连接库。通常情况下，可以使用 MySQL 的官方连接库，即 MySQL Connector/ODBC 或 MySQL Connector/NET，在 VB6.0 中连接 MySQL 数据库需要使用 ADO（ActiveX Data Objects）。
下载MySQL MySQL :: Download MySQL Community Server (Archived Versions)
下载MySQL Connector/ODBC MySQL :: Download MySQL Connector/ODBC (Archived Versions)
以下是使用 ADO 在 VB6.0 中连接到 MySQL 数据库的一般步骤：
1.安装 MySQL ODBC 驱动： 在连接到 MySQL 数据库之前，你需要确保已经在你的计算机上安装了 MySQL ODBC 驱动程序。可以从上面的网址下载并安装适用于你的操作系统的驱动程序。
2.在项目中引用 ADO 库： 打开 VB6.0 项目，在 “项目” 菜单中选择 “引用” 选项，然后选择 “Microsoft ActiveX Data Objects x.x Library”，其中 “x.x” 是所使用的 ADO 版本号。
3.编写连接代码：VB6.0 项目中，可以使用以下代码示例来连接到 MySQL 数据库。请替换示例中的数据库名称、用户名、密码和服务器地址为实际的信息
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
Dim conn As New ADODB.Connection Dim rs As New ADODB.Recordset conn.ConnectionString = "Driver={MySQL ODBC 8.0 ANSI Driver};Server=xxx.xxx.xxx.xxx;Port=3306;Database=mysql;User=xxxx;Password=xxxx;Option=3;" conn.Open rs.Open "SELECT * FROM SYS.sys_config", conn Do While Not rs.EOF Debug.Print "variable: " & rs("variable").Value Debug.Print "value: " & rs("value").Value ' 处理数据 rs.MoveNext Loop rs.Close conn.Close |
测试的系统表格式如下图所示：
有公众号之类的吗，之前这个网站打不开了
[…] 关于使用Change…
[…] 关于使用Functi…
谢谢提醒，已删 :)
还有你上边文章的图片里有一个账户名没有打…