MyTetra Share
Делитесь знаниями!
Как в модуле Access присоединить таблицу? - VB
16.03.2019
23:43
Текстовые метки: access, Link
Раздел: !Закладки - VBA - Access - Link

Как в модуле Access присоединить таблицу? - VB

10.11.2008, 15:27. Просмотров 727. Ответов 1

Метки нет (Все метки)


Пытаюсь в модуле Access присоединить таблицу (текстовый файл).
Пишу примерно следующее:


Visual BasicВыделить код

1

2

3

4

5

6

7

8

Dim dbsTemp As Database

Dim tdfLinked As TableDef

 

Set dbsTemp = CurrentDb

Set tdfLinked = dbsTemp.CreateTableDef(strTable)

tdfLinked.Connect = strConnect

tdfLinked.SourceTableName = strSourceTable

dbsTemp.TableDefs.Append tdfLinked

Здесь strTable и strSourceTable - параметры, которые я задаю соотв. образом. А проблема следующая: при прилинковке этого файла как таблицы Access типы полей проставляются автоматически и не всегда правильно. Поменять тип поля, например, на текстовое:


Visual BasicВыделить код

1

tdfLinked.Fields(1).Type = dbText

не удаётся

Можно как-нибудь во время присоединения файла прописать типы полей присоединённой таблицы?

Чтобы я мог сам задать, что в присоединённой таблице первое поле у меня Integer, второе - Text и т.д.

Последний раз редактировалось volvo; 06.09.2016 в 10:34.


Можно при линке попользовать сохраненную спецификацию связи, т.е:


Visual BasicВыделить код

1

DoCmd.TransferText acLinkDelim, "Имя сохраненной спецификации связи", ИмяПрисоединеннойТаблицы, ПутьКФайлу, False

.

Так же в этом разделе:
 
MyTetra Share v.0.52
Яндекс индекс цитирования