powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Конвертация txt в dbf
4 сообщений из 4, страница 1 из 1
Конвертация txt в dbf
    #35357971
vic_vic
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем привет! Кто подскажет как программно конвертнуть txt в dbf.
Текстовый файл таблицы не содержит, только колонки с текстом
Вот пример моего txt file

14.05.2008 12:01:08 ERROR NODE 9 3020X; 23200, PHIF_3, PHIF_03, (LINE-11)
14.05.2008 12:01:08 ERROR NODE 10 3020X; 23300, PHIF_67, phif_03, (LINE-11)
14.05.2008 12:03:01 OK NODE 11 3020X; 23200, PHIF_3, PHIF_03, (LINE-11)
14.05.2008 12:03:02 OK NODE 12 3020X; 23300, PHIF_67, phif_03, (LINE-11)
...
Рейтинг: 0 / 0
Конвертация txt в dbf
    #35358235
Galyamov Rinat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Насколько я вижу, файл у тебя не четко формализованный, т.е. нет разделителя
и колонки не фиксированной ширины.
Поэтому разобрать такой файл одной командой не получится.

Вариантов есть:
открываем файл, считываем построчно - разбираем строки - пихаем в таблицу.
Fopen, fclose, FGETS, fread ...

Или filetostr - и разбираем текст в строке.


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Конвертация txt в dbf
    #35358314
stoopper
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
считываем построчно. Строка - Stri
С 1 по10 символ (SUBSTR(stri,1,10)) - дата (CTOD()),
с 12 по 20 - (SUBSTR(stri(12,8)) - время
n1=at("NODE",Stri)
c 13 по n-11 - (SUBSTR()) - значение теста (Ок или Еррор)
n2=at(";",stri)
c n1+5 по n2-5 - val(substr())

ну и т.д.
если, конечно, с утра не напутал и структура файла неизменна
...
Рейтинг: 0 / 0
Конвертация txt в dbf
    #35359136
Galyamov Rinat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Присмотрелсся к твоим данным - по сути кждое слово - это отдельный параметр.

Замени все разделители на один и тот же (убери ";" и "," и оставь только
пробел) - дальше работать проще будет.

Если поменяешь в файле - то потом можно одной командой импортировать

Если в переменной - то искать at(lcStr," ", 1) - первый пробел at(lcStr," ",
2) - второй пробел - между ними второй параметр. И т.д.


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Конвертация txt в dbf
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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