пример для работы с Вордом

[td]

Нужен простой пример для работы с вордом (VB6.0). Надо открыть ворд, создать новый документ, вставить туда некоторый текст (без форматирования) и открыть диалог Сохранить как. Все.

Все примеры, какие нахожу, оч. сложные.. а мне больше ничего не надо и оч. срочно!
Спасибо!

[RayShade]

sub doword()

dim wrd as object

dim doc as object

set wrd = createobject("Word.Application")

wrd.visible = true

wrd.activate

set doc = wrd.documents.add

wrd.selection.typetext "My text typed in the word i open myself."

wrd.dialogs(wddialogfilesaveas).show

end sub

[Chuvak]

кто-нибудь знает где мона надыбать какую-нибудь помощь по работе через VB в Word'е и Excel'е по подробнее (можно пример)

[RayShade]

Читай Word, Excel VBA reference в хелпе к этим продуктам.

[stud]

кто-нибудь знает где мона надыбать какую-нибудь помощь по работе через VB в Word'е и Excel'е по подробнее (можно пример)

Вот тут есть нечто полезное про взаимодействие Delphi и Excel :

http://seeyou.narod.ru/Delphi/delphi_excel.htm
http://crocodile.iis.nsk.su/~smash/delp ... index.html

Думаю, адаптировать под VB не так сложно. Мне в свое время помогло

[td]

wrd.dialogs(wddialogfilesaveas).show

у меня на этой строке ошибку пишет

[corgi]

тода попробуй написать так:
wrd.dialogs(84).show

[td]

все равно.. пишет, что "объект не поддерживает этот метод или свойство"