Dim db As Database
  Dim tdf1 As TableDef, tdf2 As TableDef
  Dim ndx1 As Index, ndx2 As Index
  Dim fld1 As DAO.Field, fld2 As DAO.Field
  Dim dbpath,sql As String
  dbpath="e:\temp\poly1shp.dbf"
  Set db = OpenDatabase(dbpath, False, False, "dBase IV;")
///////////
实时错误3044'e:\temp\poly1shp.dbf不是一个有效的路径。确认路径名称拼写是否正确。。
文件确实存在,我引用了Microsoft DAO 3.51 Object Library 或者3.6的,都出这个错误,什么缘故呢?