| |
|
|
| |
to: Мудрый клен
(24.04.2009 в 15:15)
|
| | Sub LinkedTable()
Dim tdfLinked As TableDef
Set tdfLinked = CurrentDb().CreateTableDef("Name1")
tdfLinked.Connect = ";DATABASE=c:\test.mdb;PWD=123"
tdfLinked.SourceTableName = "Name2"
CurrentDb().TableDefs.Append tdfLinked
End Sub | |
| |
|
