vb如何開啟 .dbf 的資料檔

[一尾]

Set oldws = DBEngine.Workspaces(0)
Set olddb = oldws.OpenDatabase(path)
Set newtable = olddb.OpenRecordset("list.dbf")
好像不行

用 Data1.DatabaseName = "list.dbf"
也不行
不知為什麼
救救我吧
--
※ Origin: 全球資訊站 (www.ccca.nctu.edu.tw) ◆ From: pc40-188.dorm.ttit.edu.tw

[蟄龍散人]

==> 在 kinki...@www.ccca.nctu.edu.tw (一尾) 的文章中提到:
: Set oldws = DBEngine.Workspaces(0)

: Set olddb = oldws.OpenDatabase(path)
: Set newtable = olddb.OpenRecordset("list.dbf")
: 好像不行
: 用 Data1.DatabaseName = "list.dbf"
: 也不行
: 不知為什麼
: 救救我吧

======================================================================

Dim db As Database
Dim rs As Recordset
Set db = opendatabase("c:\y\orders.dbf", False, True, "dBASE III")
Set rs = db.OpenRecordset("select * from (c:\y\orders)")

這是筆者的實際經驗，提供給您做個參考。

P.S. 若使用 Data control ， 則

Data1 的 Connect 屬性必須設為 "dBASE III"

< Fujitsu Application System Programmer >

=======================================================================