VB 编程读取Mysql的数据是必须要用 MySql 的 ODBC Driver 的!
DSN 倒是可以不用的

解决方案 »

  1.   

    可以利用ole db 的sql
    privoder=sqloledb.1
      

  2.   

    to playyuer:
       但是如果这样,对于客户来说,还要连同mysql的odbc driver一起分发出去,不知道还有没有其他方法
    to ithc:
       能说的详细一点吗?谢谢
      

  3.   

    必须要连同mysql的odbc driver一起分发出去!
    下载:
    http://www.mysql.com/downloads/api-myodbc.html
    这里提供了: only myodbc.dll and myodbc2.dll
    打到 VB 的安装包里即可
     
      

  4.   

    赫赫,找到了,playyuer以前发的贴子里面有答案
    Dim strConMy As StringSet conMy = New ADODB.Connection'strConMy = "Provider=MSDASQL.1;Driver={MySQL};host=localhost;DataBase=feng;UID=localhost"strConMy = "Data Provider=MSDASQL.1;User ID=;Password =;driver=MySQL;host=localhost;database=feng"conMy.Open strConMy
      

  5.   

    关于打包的问题,请教playyuer(女㊣爱) :
    我在编译成功之后,打包分发到客户机器,我本机上装的mysql odbc driver是myodbc-2.50.37-nt.zip,然后,搜索倒机器上的一个myodbc.dll,将此文件打包进去之后,在客户机器上进行安装,执行程序时候,仍然提示错误“没有发现数据源名称并且没有制定数据库名称”。
    打开客户机器上的ODBC配置,没有发现mysql的数据源,请问,应该如何打包?
    谢谢
      

  6.   

    'Server =? 要指定(一般是机器名)
    'DataBase=?;User ID=?;Password=? 等都要指定
    Dim adoConnection As New ADODB.Connection
    Dim adoRecordset As New ADODB.Recordset
    adoConnection.Open "Data Provider=MSDASQL.1;Driver={MySQL};Server=YourServerName;DataBase=test;User ID=monty;Password="
    adoRecordset.Open "SELECT * FROM mytable", adoConnection
      

  7.   

    是,我已经在本地测试成功了,读取、操作服务器上的mysql数据库,现在主要的问题是如何打包分发到客户机器上。
    我把myodbc.dll已经打包进到安装文件里面了,可在客户机器上还是不能运行
    请问我该如何做?谢谢
      

  8.   

    MyODBC 2.50.37 for Windows95/98 (full setup) 
    http://www.mysql.com/Downloads/MyODBC/myodbc-2.50.37-win95.zipMyODBC 2.50.37 for NT/2000 (full setup) 
    http://www.mysql.com/Downloads/MyODBC/myodbc-2.50.37-nt.zipMyODBC 2.50.37 Windows95/98 and NT/2000 (only myodbc.dll and myodbc2.dll) 
    http://www.mysql.com/Downloads/MyODBC/myodbc-2.50.37-dll.zip
      

  9.   


    那您的意思是客户的程序安装之后
    在在客户机上安装这个zip包?