powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / как перевести doc в dbf
10 сообщений из 10, страница 1 из 1
как перевести doc в dbf
    #32773052
zloy_ya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
есть строка в doc-файле надо перевести её в dbf
что только не пробовал получает ся криво
может посоветуйте чего
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773268
T0lik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Это откуда такие файлы получаются?
Нельзя ли получить Вордовый документ разбитый на поля каким нибудь разделителем?
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773334
zloy_ya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
это мне узеры генерируют в своей программе а мне надо в dbf вставить
а с doc-файлом я ничего сделать не могу
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773337
zloy_ya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
там поля просто все определенного размера должны быть
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773388
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
zloy_yaтам поля просто все определенного размера должны быть
тада сохрани его как текст, запусти Ехель, при открытии файла он будет много спрашивать - как представить по ячейкам.. а уже тама выгрузи его в DBF
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773401
zloy_ya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hel!Riser zloy_yaтам поля просто все определенного размера должны быть
тада сохрани его как текст, запусти Ехель, при открытии файла он будет много спрашивать - как представить по ячейкам.. а уже тама выгрузи его в DBF
дык надо чтоб он это автоматически происходило
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773421
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
раз фиксированой длины - тада пользуй
APPEND FROM ... TYPE SDF - но этот фил должен быть текст ASCII. Програмно Ворд поднять, сохранить файло как текст и дале аппенд
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773643
T0lik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
oWord = CreateObject("Word.Application")
WITH oWord
	.Documents.Open("D:\test.doc")
	FOR lnCount =  1  TO n && n - число полей
		.Selection.MoveRight( 1 ,X[lnCount], 1 ) && x - массив размерности полей
		laPer[lnCount] = .Selection.Text
	ENDFOR
	.Documents.Close
ENDWITH
Итог - в массиве laPer
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773707
zloy_ya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
T0lik
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
oWord = CreateObject("Word.Application")
WITH oWord
	.Documents.Open("D:\test.doc")
	FOR lnCount =  1  TO n && n - число полей
		.Selection.MoveRight( 1 ,X[lnCount], 1 ) && x - массив размерности полей
		laPer[lnCount] = .Selection.Text
	ENDFOR
	.Documents.Close
ENDWITH
Итог - в массиве laPer

там поле фиксированные всмысле по строкам а так в одной строке они разные
...
Рейтинг: 0 / 0
как перевести doc в dbf
    #32773724
T0lik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
zloy_ya
там поле фиксированные всмысле по строкам а так в одной строке они разные
То есть вы не знаете сколько символов в документе занимает каждое поле?
А как тогда отделять поля друг от друга - разделителей то нету. И по пробелам тоже не отделишь.
В принципе если вы знаете как сделать такое разделение - заместо массива загоните всё в символьную переменную и делайте потом с ней что хотите.
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / как перевести doc в dbf
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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