VB[ODBC 驱动程序管理器]未发现数据源名称并且未指定默认驱动程序

小女子最近在弄进销存管理系统的登录界面，在combox中选择已经在Access数据库中建立好的表格中的姓名，模块的代码如下：Public Sub Main()
constr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db2.mdb;Persist Security Info=false"
dbstr1 = App.Path & "\db2.mdb"
nAdoCon.ConnectionString = constr
nAdoCon.Open   Load frmLogin
frmLogin.Show
Load frmMain
If nAdoCon.State <> 1 Then  
  MsgBox "数据库连接失败！", vbInformation + vbOKOnly, "错误"  '给出错误信息
  Exit Sub
End If
End Sub
但是，悲催的是一旦运行就显示[ODBC 驱动程序管理器]未发现数据源名称并且未指定默认驱动程序！
接近崩溃边缘，望高人搭救！ --------------------编程问答-------------------- dbstr1 = App.Path & "\db2.mdb"
检查一下这个出处在哪里，又在哪里被引用
--------------------编程问答-------------------- 是检查他的路径么？ --------------------编程问答-------------------- 多向高手学习了！！！！！！！！ --------------------编程问答-------------------- 用ADODC控件连接数据库,把生成的链接字符串拷贝过来就可以了 --------------------编程问答-------------------- http://download.csdn.net/source/1421188 --------------------编程问答-------------------- nAdoCon.Open constr

补充：VB ,  网络编程