初学vb，不知道这个为什么链接错误，请大家指教，谢谢！！

Question

错误为，找不到可安装的ISAM，这个是不知道是什么代码如下：Public conn As Connection
Private Sub Form_Load()
    Dim conn As ADODB.Connection
    Dim strAccess As String
    strAccess = "Provider=Microsoft.Jet.OLEDB.4.0;Data Soruce=" & App.Path + "\test.mdb;User Id=admin;Password=;"
    Set conn = New Connection
   conn.Open strAccess    Dim rs As New ADODB.Recordset
    Set rs = New ADODB.Recordset
    rs.Open "select  name from tm", conn
    While Not rs.EOF
    
    rs.MoveNext
    Wend
    rs.Close
End Sub

Answer 1

有两种可能： 
    1、没有安装相应的数据库驱动程序。你可以使用RegEdit查看HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\3.5\Engines（VB6为...\Jet\4.0\...），从这里你可以看到当前系统安装了多少驱动程序，每个驱动都是由哪些文件组成，请检查一下你所需要的数据库格式的驱动文件是否被拷贝到System目录中。更详细的介绍可以参考微软的Knowledge Base的文章：“Q240377 HOWTO: Insuring Jet 3.5 Is Installed Correctly (Part I)”和微软的Knowledge Base的文章：“Q245524 HOWTO: Insuring Jet 3.5 Is Installed Correctly (Part II)”。在这两篇文章中详细地列出了到底ISAM包括哪些文件和注册表设置（VB 5.0以后版本将有关信息保存在注册表中，而不是INI中）。 
    2、指定数据库时所使用字符串有错误。原来我们对QA000115 "在VB中如何实现把当前库或表转换为另外一种数据库文件"的回答有一处错误，访问Excel 95文件应该指定使用'EXCEL 5.0;'，而不是'EXCEL 7.0;'。VB 5.0没有定义'EXCEL 7.0;'这种方式。如果在指定数据库方式时出现错误，VB也会产生这条错误信息。 

Answer 2

查看一下连接的字符串我想可能连接字符串错了....或者有没有test.mdb这个数据库....

Answer 3

解决办法有人说是
  在“工程|引用”中引用DAO3.6即可。 
 我没有试过，你可以试试

Answer 4

找不到可安装的ISAM
-----------------------
多数的情况下是连接字符串没写对strAccess = "Provider=Microsoft.Jet.OLEDB.4.0;Data Soruce=" & App.Path + "\test.mdb;User Id=admin;Password=;"果然是，Soruce 写错了，应该是 Source，这个错误还不容易发现