Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Изменение формата полей с привязанной Excel-таблице / 1 сообщений из 1, страница 1 из 1
25.01.2005, 16:47:35
    #32882910
Andrey Dovzhik
Andrey Dovzhik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение формата полей с привязанной Excel-таблице
Не подскажет ли кто, как можно на этапе создания связи определить самому, какого формата будут поля?

А то Access считает (или кто у них там главный), что лучше меня знает, какого формата поля в Excel-таблице. А изменить связь нельзя :-( И если попытаться описать поля на этапе создания связи, то выдается ошибка «3190» «Определено слишком много полей»

Пытаюсь создать связь так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Sub createTD()
    Dim tdf As TableDef
    Dim fldId As field
    Dim fldVal As field
    Dim strCon As String

    Set tdf = CurrentDb.CreateTableDef("load_table")
    tdf.Connect = "Excel 8.0;DATABASE=c:\tmp\test.xls"
    tdf.SourceTableName = "Лист1$"
    
    CurrentDb.TableDefs.Append tdf
    RefreshDatabaseWindow
End Sub

'++++++++++++++++++++++++++++++++++++++++++++++++
'Если добавить нижеследующее – то возникает ошибка 3190:
Set fldId = tdf.CreateField("ID", dbText,  40 )
tdf.Fields.Append fldId
Set fldVal = tdf.CreateField("VAL", dbText,  40 )
tdf.Fields.Append fldVal

Просто поле VAL – текстовое, то, что там попадаются часто одни цифры – ничего не меняет. Вот только как сказать это Access’у? А то он по первой записи определяет, что типа одни цифры – и успокаивается.

Можно конечно через Excel объект, но тогда придется переделывать весь алгоритм программы, т.к. она черпает данные из присоединенной таблицы и думает, что это самая настоящая ее родная таблица. Да и копировать во временную тоже не охота - mde стремительно разрастется, пользователи разворчатся. Ведь и нужна-то такая мелочь.
Спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Изменение формата полей с привязанной Excel-таблице / 1 сообщений из 1, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 407ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1669061]:
 0ms
get settings:
 8ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 157ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 13ms
get tp. blocked users:
 1ms
others: 208ms
total:  407ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]