用VBA检查mysql是否启动

方法如下

1.使用命令 # service mysqld status 命令来查看mysql 的启动状态，如果出现mysqld is stopped 那就说明mysql服务是停止状态

2.如果出现 mysqld is running 那就说明mysql服务是启动状态 。

3.使用命令chkconfig --list 命令来查看mysql 的启动状态，在服务中找到mysqld的服务，如果状态为off，说明mysql服务没有启动。

可以使用以下代码在EXCEL上使用VBA连接MYSQL数据库    ：

Dim strconnt As String

  strconnt = ""

  Set connt = New ADODB.Connection

  Dim sevip, Db, user, pwd As String

  '设服务器地址、所连数据，及登录用户密码

  sevip = "localhost"

  Db = “test"

  user = "root"

  pwd = "123456"

  strconnt = "DRIVER={MySql ODBC 5.3 Unicode Driver}SERVER=" & sevip & "Database=" & Db & "Uid=" & user & "Pwd=" & pwd & "Stmt=set names GBK"

  connt.ConnectionString = strconnt

  connt.Open

VBA链接mysql数据库报错显示运行时错误

有2个原因 第一：程序方面的错误，这个没什么好说的吧，捉“虫”即可 第二：也就是本文标题提到的错误实际上是由于MS Jet引擎没有对临时目录的写入权限，导致数据库创建失败。

---