# Re: 再次请教Scott Lee

Posted by 皮皮 on June 08, 1999 at 17:25:52:

In Reply to: Re: 再次请教 posted by 皮皮 on June 08, 1999 at 12:04:48:

请问Scott Lee

Set Database = DBEngine.Workspaces(0).OpenDatabase("c:\plus", False, False, "text;hdr=no/yes")
Set Recordset = Database.OpenRecordset("score2")
Set Database = DBEngine.Workspaces(0).OpenDatabase("c:\plus\kk.MDB")
Set td = Database.CreateTableDef("temp")
td.Connect = "text;HDR=No/Yes;database=c:\plus\kk.mdb"
td.SourceName = "score2"
请问为何RUN 至此
出现'物件不支援此属性或方法
Database.TableDefs.Append td

: 谢谢您:

Follow Ups:

- 再试试看 Scott 18:38:22 6/08/99 (0)