VB6.0上64位的mySQL ODBC连接字符串

我在VisualBasic6.0中有一个使用MySQL ODBC连接的程序，我安装了MySQL ODBC连接器5.2.7 64位，但当我尝试连接数据源时，它会说

[Microsoft][ODBC驱动程序管理器]指定的DSN包含驱动程序和应用程序之间的体系结构不匹配

有没有办法编辑我的连接字符串以使用64位或任何其他解决方案来解决此错误？这是我的密码：

Public Function dbclose()
On Error Resume Next
    ac.Close
    Set ac = Nothing
    ar.Close
    Set ar = Nothing
End Function
Public Sub openDB()
Dim connect As String

connect = "Provider=MSDataShape.1;Persist Security Info=False;Data Source=LSRS;Data Provider=MSDASQL"
strConek = "Provider=MSDataShape.1;Persist Security Info=False;Data Source=LSRS;Data Provider=MSDASQL"

With con
    .Open connect
    .CursorLocation = adUseClient
 End With
End Sub

Public Function dbuser()
Set ac = New ADODB.Connection
Set ar = New ADODB.Recordset
strConek = "Provider=MSDataShape.1;Persist Security Info=False;Data Source=LSRS;Data Provider=MSDASQL"
End Function

Public Function dbconek()
    Set ac = New ADODB.Connection
    Set ar = New ADODB.Recordset
strConek = "Provider=MSDataShape.1;Persist Security Info=False;Data Source=LSRS;Data Provider=MSDASQL"
End Function

---

您的Visual Basic应用程序是否编译为64位应用程序？没有，但对我来说一切都很好，我在windows XP 32位上使用相同的版本。您使用哪个数据库，mysql还是ms sql？您需要一个32位驱动程序；32位进程不能使用64位驱动程序，无论机器/操作系统架构如何。@Shadow我使用的是mysql