ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Импорт из excel в мемо-поле
11 сообщений из 11, страница 1 из 1
Импорт из excel в мемо-поле
    #38050103
Nnnnnn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nnnnnn
Гость
Тупизм напал - как из excel считать в мемо поле один из столбцов? Считывается вообще вся таблица, но один столбец слишком длинный, строки не хватает.
...
Рейтинг: 0 / 0
23.11.2012, 11:05
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050368
Станислав С...кий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Станислав С...кий
Гость
Nnnnnn,
Прежде всего, таблица должна иметь мемо-поле. :)
Вот примерный код:
Код: sql
1.
2.
3.
4.
5.
6.
7.
Off_App = CREATEOBJECT("Excel.Application")
Off_App.Workbooks.Open(<FileName>)
stroka = Off_App.Sheets(1).Cells(row, col).value && считываем данные из ячейки Экселя
select <table>
append blank
replace <table>.<fields> with stroka && вставляем данные в Мемо-поле
Off_App.Quit()
...
Рейтинг: 0 / 0
23.11.2012, 13:06
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050419
Jonny540
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jonny540
Участник
Станислав С...кий
Код: plsql
1.
2.
append blank
replace <table>.<fields> with stroka && вставляем данные в Мемо-поле


Наверное, лучше так:
Код: plsql
1.
APPEND MEMO MemoFieldName FROM FileName

Иначе следующая ячейка будет заменять значение мемо-поля.
...
Рейтинг: 0 / 0
23.11.2012, 13:30
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050442
Станислав С...кий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Станислав С...кий
Гость
Jonny540Станислав С...кий
Код: plsql
1.
2.
append blank
replace <table>.<fields> with stroka && вставляем данные в Мемо-поле


Наверное, лучше так:
Код: plsql
1.
APPEND MEMO MemoFieldName FROM FileName

Иначе следующая ячейка будет заменять значение мемо-поля.
Так это образец был... Далеко не полный, но иллюстрирующий принцип работы... Так-то, по-хорошему, там бы еще надо цикл вставить, чтобы по столбцу бежать... И преобразование Value ячейки листа рабочей книги Excel к типу колонки таблицы....

И еще... Что-то я сомневаюсь, что Append Memo с файлом типа xls сработает так, как это нужно топикстартеру...
...
Рейтинг: 0 / 0
23.11.2012, 13:37
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050443
Р0032
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Р0032
Гость
Не верь этим ображщенным в невежество.
Копини в сторону F1 ( formula one ).
...
Рейтинг: 0 / 0
23.11.2012, 13:37
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050483
Nnnnnn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nnnnnn
Гость
Jonny540,

Append memo не подойдет, мне не нужен один столбец, мне нужна вся таблица в целом.
...
Рейтинг: 0 / 0
23.11.2012, 13:50
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050489
Nnnnnn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nnnnnn
Гость
Р0032,

хелп большой, что там искать-то?

Особенно досадно, что я это уже делала пару лет назад, но вспомнить не могу как, а исходники удалены уже. И ведь 100% не сложно и ничего особо хитрого нет.
...
Рейтинг: 0 / 0
23.11.2012, 13:53
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050495
Nnnnnn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nnnnnn
Гость
Станислав С...кий,

Ну цикл-то я вставила, это и ежу понятно что он там должен быть. (К тому же аналогичный код у меня есть в одной из форм, идея эта мне знакома)
Только почему-то считываются пустые значения (вот это вообще хз из-за чего). И не уверена я что этот способ не обрежет мне строки длиннее 255 символов
...
Рейтинг: 0 / 0
23.11.2012, 13:56
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050513
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
NnnnnnТолько почему-то считываются пустые значения (вот это вообще хз из-за чего).Так что, сложно поставить suspend и посмотреть, что там считывается и записывается?
Строки, кстати, не обрежутся, и способ - правильный.
...
Рейтинг: 0 / 0
23.11.2012, 14:04
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050532
Станислав С...кий
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Станислав С...кий
Гость
Nnnnnn,
У меня работает....
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
CREATE CURSOR test (tm1 M)
SELECT test
Off_App = CREATEOBJECT("Excel.Application")
Off_App.Workbooks.Open("c:\temp\t1.xls")
FOR i = 1 TO 100
stroka = Off_App.Sheets(1).Cells(i, 4).value 
select test
append blank
replace test.tm1 with stroka 
ENDFOR 
Off_App.Quit()

SELECT test
BROWSE NORMAL



Вы записываете точно в мемо-поле?
Отладчик есть. Можно взять и посмотреть что считывается...
...
Рейтинг: 0 / 0
23.11.2012, 14:14
| Ответить | Цитировать | Написать  
Импорт из excel в мемо-поле
    #38050562
Nnnnnn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nnnnnn
Гость
Станислав С...кий,

Да, говорю же, тупизм напал...
у меня просто переменные были обозваны так же, как и поля таблицы
Сорри, спать охота просто )
...
Рейтинг: 0 / 0
23.11.2012, 14:28
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Импорт из excel в мемо-поле
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=41&fpage=48&tid=1583311]:
 0ms
get settings:
 11ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 36ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 52ms
get tp. blocked users:
 2ms
others: 15ms
total:  153ms
созд. / загр.: 153ms
x
x
Закрыть


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