| Вопрос: RTF from db to WORD | Добавлено: 21.01.04 12:14 |
Автор вопроса:  Chill | ICQ: 554200 |
|
Есть абстрактная БД(пока не известно какая)... известно только то, что там будут поля, заполненные текстом в RTF формате... как мне перенести текст из этих полей с сохранением форматирования в Ворд... НО! Есть ограничение... нельзя пользоваться буфером обмена... Может кто-то сталкивался... плз. подскажите... |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа:  vmj Вопросов: 2 Ответов: 6 |
Профиль | | #1 | Добавлено: 22.01.04 23:57 |
|
With .Cell(n, 2) 'Собственно вставка RtfAddFromBd "Название поля", rS .Range.InsertFile msRTB End With Private Sub RtfAddFromBd(ByVal sFn As String, rS As Recordset) Dim sRtf As String With rS RTB.TextRTF = .Fields(sFn).Value End With With RTB .SaveFile msRTB DoEvents End With End Sub |
||
|
Номер ответа: 2 Автор ответа:  Chill ICQ: 554200 Вопросов: 101 Ответов: 343 |
Профиль | | #2 | Добавлено: 26.01.04 13:53 |
|
Спасибо, вроде работает |
||
|
Номер ответа: 3 Автор ответа:  vmjВопросов: 2 Ответов: 6 |
Профиль | | #3 | Добавлено: 26.01.04 22:15 |
| Удачи! | ||
Страница: 1 |