эспорт в Word

  • Автор темы Saoron-live
  • Дата начала
Статус
Закрыто для дальнейших ответов.
S

Saoron-live

Гость
#1
Как экспортировать в Word из Lotus'a отдельные поля ? поделитесь скриптами!!!
 
H

Hedg

Гость
#3
<!--QuoteBegin-Domino6+21:06:2006, 11:45 -->
<span class="vbquote">(Domino6 @ 21:06:2006, 11:45 )</span><!--QuoteEBegin-->[snapback]38633" rel="nofollow" target="_blank[/snapback]</div>[/quote]
И чё с этой ссылкой делать?
 

Вложения

  • 86.7 КБ Просмотры: 106
S

Saoron-live

Гость
#5
чето у меня ни шыша не получается!!! :) нельзя-ли разложить всё по полочкам чтоб такому как мне было понятно :(
 
S

Saoron-live

Гость
#7
Для: Юлия
в общето я писал слово экспорт он мне находил то что нужно но без скрипта :(
А так я не особо въежаю :)
Я всего лишь новичёк в этом деле!
 

trueq

Member
30.03.2006
10
0
#8
Всё достаточно просто.
Dim db As NotesDatabase
Dim session As New NotesSession
Dim ws As New NotesUIWorkspace
Dim doc As NotesDocument

Set db = session.CurrentDatabase
Set uidoc = ws.CurrentDocument
Set doc = uidoc.Document
' Создаем объект Word
Set wordAppObject = CreateObject("Word.Application")
' Делаем объект видемым
wordAppObject.Visible = True
Call wordAppObject.Documents.Add
Set wordDocObject = wordAppObject.ActiveDocument
' Передаем значение поля famil в Word
wordDocObject.Paragraphs(1).Range.InsertBefore doc.famil(0)
 
D

Domino6

Гость
#9
Для: trueq
А как учитывать форматирование - это больше заполнение а не экспорт
 
S

Saoron-live

Гость
#10
Для: trueq
огромное спасибо !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!1 :)
работает!! :)
 

trueq

Member
30.03.2006
10
0
#11
Для: Domino6
Верно. Форматирование можно конечно ручками написать, но это не выход. Получается тоже заполнение.
 
Статус
Закрыто для дальнейших ответов.