ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / формат файла спецификации для TransferText
10 сообщений из 10, страница 1 из 1
формат файла спецификации для TransferText
    #32359175
chkalov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
chkalov
Гость
Не подскажете где можно посмотреть (или приведите пример) как выглядит файл спецификации, используемый для импорта текстового файла командой TransferText?
...
Рейтинг: 0 / 0
22.12.2003, 04:40
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359271
chkalov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
chkalov
Гость
Собственно, мне нужно знать как указать тип разделителя, формат даты, разделитель десятичных знаков и прочее используя DoCmd.TransferText
Очень нужно написать альтернативный визард импорта текстовых файлов
...
Рейтинг: 0 / 0
22.12.2003, 09:33
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359321
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hummer
Участник
Формат посмотреть можно след. образом:
при импорте данных из текстового файла нажать на первом шаге визарда дополнительно - мы попадём в настройки спецификации. Её можно сохранить и посмотреть. Но это записи в табличке (MSysIMEXSpecs) - как создать ini я не понял.
В хелпе написано:
To create a schema file, you can use the text import/export wizard to create the file.
...
Рейтинг: 0 / 0
22.12.2003, 10:11
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359336
chkalov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
chkalov
Гость
я конечно поищу где это :), но если можно - подскажи где и как посмотреть это?
...
Рейтинг: 0 / 0
22.12.2003, 10:30
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359341
chkalov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
chkalov
Гость
нашел... а как ее в базе можно использовать? нао подумать ... есть идеи подскажи, плиз
...
Рейтинг: 0 / 0
22.12.2003, 10:37
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359399
ya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ya
Участник
чет примерно так:
sStr = OpenFile("Путь", "", "расширение", "Укажите файл ")
DoCmd.TransferText acImportFixed, "спецификация", "твоя таблица", sStr, True
тока сначала спецификацию сохрани и таблицу правильно офорьм
...
Рейтинг: 0 / 0
22.12.2003, 11:26
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359404
Фотография PA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PA
Участник
Писалось лет шесть назад(для 95 акеса), наверняка что-нибудь поменялось - так что внимтельней, если будешь у себя использовать:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
            If DCount( "*" ,  "MSysIMEXSpecs" ,  "SpecName="  "Export_"  & strTableName &  "_TableToText"  "") = 0  Then
                Set rst = db.OpenRecordset("MSysIMEXSpecs ")
                With rst
                    .AddNew
                    .Fields(" SpecName ") = " Export_ " & strTableName & " _TableToText "
                    .Fields(" DateDelim ") = " . "
                    .Fields(" DateFourDigitYear ") = " - 1  "
                    .Fields(" DateLeadingZeros ") = " - 1  "
                    .Fields(" DateOrder ") = 0         ' 0 - ДМГ; 1 - ДГМ; 2 - МДГ; 3 - МГД; 4 - ГДМ; 5- ГМД
                    .Fields("DecimalPoint") = ","
                    .Fields("FieldSeparator") = ";"
                    .Fields("FileType") = 0         '  0  - win кодировка;  1  - dos кодировка
                    .Fields("SpecType ") = 1          ' 2 - с полями фикс. ширины; 1 - с разделителями
                    .Fields("StartRow") = 1         '  1  - первая строка содержит имена полей;  0  - нет
                    .Fields("TextDelim ") = "  """ 
                    .Fields( "TimeDelim" ) =  ":" 
                    .UPDATE
                    .Bookmark = .LastModified
                    lngID = .Fields( "SpecID" )
                    .Close
                End With
                Set rst = db.OpenRecordset( "MSysIMEXColumns" )
                lngPos =  1 
                For Each fld In tbl.Fields
                    With rst
                        .AddNew
                        .Fields( "SpecID" ) = lngID
                        .Fields( "FieldName" ) = fld.Name
                        .Fields( "DataType" ) = fld.Type
                        .Fields( "IndexType" ) =  0         '  0  - нет;  1  - есть(неуникальный);  2  - есть(уникальный)
                        .Fields( "SkipColumn" ) = False
                        .Fields( "Start" ) = lngPos
                        .Fields( "Width" ) = fld.Size
                        lngPos = lngPos + fld.Size
                        .UPDATE
                    End With
                Next
                rst.Close
            End If
...
Рейтинг: 0 / 0
22.12.2003, 11:29
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359432
chkalov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
chkalov
Гость
я путь попроще уже нашел: просмотр и правка по SQL запросам созданным в Access
Минус в том, что импорт не поддерживает слияние последовательных разделителей в один (например пробелов) и поэтому может получиться много полей, може есть выход и в этом?

Программа делается для простых пользователей которым низя думать ни очем вроде структур и лезть в эти дебри
...
Рейтинг: 0 / 0
22.12.2003, 11:48
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359578
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Вот нечто похожее:\r
\r
DoCmd.TransferText: избавиться от ..._ОшибкиИмпорта
...
Рейтинг: 0 / 0
22.12.2003, 13:13
| Ответить | Цитировать | Написать  
формат файла спецификации для TransferText
    #32359597
chkalov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
chkalov
Гость
спасибо - полезнейший пример
...
Рейтинг: 0 / 0
22.12.2003, 13:29
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / формат файла спецификации для TransferText
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32359597&tid=1677516]:
 0ms
get settings:
 7ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 145ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 63ms
get tp. blocked users:
 2ms
others: 196ms
total:  449ms
созд. / загр.: 449ms
x
x
Закрыть


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