Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: VB6 и Word 2007 может работать? Добавлено: 04.10.08 21:09  

Автор вопроса:  Aston | ICQ: 214-179-991 
Тут вот возникла такая причина не пойму почему не работает код:
Dim objWord As Word.Application

Private Sub Command1_Click()
Dim objDoc As Word.Document
On Error Resume Next
Set objDoc = objWord.Documents.Open("C:\pp\Dok.docx")'Эта строчка не работает
objDoc.Bookmarks("sName").Range.Text = "Sasha"
objDoc.SaveAs "C:\Dock.docx"
End Sub
Подскажите почему не открывает документ - хотя он существует и расширение вроде правильно указал.
Главное создать документ и внести записи я могу а открыть не получается(

Ответить

  Ответы Всего ответов: 5  

Номер ответа: 1
Автор ответа:
 mc-black



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #1
Добавлено: 07.10.08 09:16
расширение у документов ms word должно быть doc

Ответить

Номер ответа: 2
Автор ответа:
 Aston



ICQ: 214-179-991 

Вопросов: 42
Ответов: 272
 Профиль | | #2 Добавлено: 07.10.08 22:35
doc не подходит та же ошибка я даже сохранял файл в ворде 97-2003 то есть в расширении док - тое получается что ошибка где то в синтаксисе. Но этот файл точно есть и путь правильно указан.

Ответить

Номер ответа: 3
Автор ответа:
 mc-black



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #3
Добавлено: 08.10.08 10:51
  1. Dim objWord As Word.Application

Память под объект ты выделил, а где же сождание экземпляра объекта?
  1. Set objWord = Word.Application

И тажже не забудь про чистку мусора:
  1. Set objWord = Nothing


Ответить

Номер ответа: 4
Автор ответа:
 mc-black



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #4
Добавлено: 08.10.08 10:52
Наверное вернее указать так:
  1. Set objWord = New Word.Application

Ответить

Номер ответа: 5
Автор ответа:
 Aston



ICQ: 214-179-991 

Вопросов: 42
Ответов: 272
 Профиль | | #5 Добавлено: 08.10.08 11:32
Спасибо ошибка была лишь в том что я не открыл сам ворд и потому не работало
Set objWord = Word.Application )

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам