Версия для печати темы Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB6 > Путь к файлу

Автор: Guest 11.9.2005, 15:48

Cтрокой TableWord.Cell(1, 2).Range.InlineShapes.AddPicture FileName:="e:\Gerb.jpg", LinkToFile:=False, SaveWithDocument:=True будет добавлена картинка в вордовскую таблицу. путь к картике e:\Gerb.jpg если сменить на Gerb.jpg то есть что бы картинка вставлялась из папки с программой выдается ошибка, типа файл не найден. Как сделать что бы картинка бралась из папки с программой, без указания точного пути диск, папка.

Автор: Gannibal 11.9.2005, 18:48

Код App.Path & "\Gerb.jpg"

Автор: Guest 11.9.2005, 19:53

а полностью ? TableWord.Cell(1, 2).Range.InlineShapes.AddPicture App.Path & "\Gerb.jpg", LinkToFile:=False, SaveWithDocument:=True не работает

Автор: Gannibal 11.9.2005, 20:33

Цитата(Guest @ 11.9.2005, 18:53) TableWord.Cell(1, 2).Range.InlineShapes.AddPicture App.Path & "\Gerb.jpg", LinkToFile:=False, SaveWithDocument:=True ты там ничего незабыл? Код TableWord.Cell(1, 2).Range.InlineShapes.AddPicture FileName:=App.Path & "\Gerb.jpg", LinkToFile:=False, SaveWithDocument:=True ???

Автор: Guest 11.9.2005, 22:28

Автор: Gannibal 11.9.2005, 23:42

to Guest давай регестрируйся.. больше поможем

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)