以ODBC方式連結DBASE III,在多人使用環境下發生上述問題,(編號:6129)

Dim as New ADODB.Connect
Dim as New ADODB.Recordset
db.open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=dBASE Files;Mode=Read;Initial Catalog=M:\test "
set rs=db.execute("select * from demo")