Прочитать значения свойств файла

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
SVL
Обычный пользователь
Обычный пользователь
 
Сообщения: 97
Зарегистрирован: 19.12.2002 (Чт) 11:37
Откуда: Russia

Прочитать значения свойств файла

Сообщение SVL » 11.02.2004 (Ср) 11:51

Всем привет! В 2000 винде при вызове свойств любого файла появляется окно с вкладкой <Сводка>. На этой вкладке расположены такие свойства, как <Название>, <Автор>, <Ключевые слова>, <Комментарий>. Не подскажете, как получить их из кода программы?

Rainbow
Человек-радуга
Человек-радуга
 
Сообщения: 543
Зарегистрирован: 13.05.2003 (Вт) 14:16

Сообщение Rainbow » 11.02.2004 (Ср) 17:28

Говорят, есть у MS ActiveX'ина, называется DSOfile.exe
Поищи на msdn.microsoft.com

помогает прочитать и записать свойства у офисных файлов точно, а может и еще каких...
Учиться - значит открывать для себя то, что уже знаешь. <...> Учить - значит напоминать другим о том, что они знают это также хорошо, как и ты. <...> Лучше всего ты учишь тому, чему тебе самому больше всего надо научиться. (Р. Бах)

SVL
Обычный пользователь
Обычный пользователь
 
Сообщения: 97
Зарегистрирован: 19.12.2002 (Чт) 11:37
Откуда: Russia

Сообщение SVL » 12.02.2004 (Чт) 18:22

На http://clubpro.spb.ru/ubb/Forum3/HTML/000041.html нашел подобный код, но на С. Может, можно его перевести на VB? Декларацию функции нашел:
Код: Выделить всё
Declare Sub StgOpenStorageEx Lib "ole32.dll" _
(ByRef pwcsName As Byte, ByVal grfMode As Long, ByVal stgfmt As Long, _
ByVal grfAttrs As Long, ByRef pStgOptions As STGOPTIONS, reserved As Any, _
ByVal riid As Long, ppObjectOpen As Any )

, а вот с параметрами ее разобраться никак не могу.

Rainbow
Человек-радуга
Человек-радуга
 
Сообщения: 543
Зарегистрирован: 13.05.2003 (Вт) 14:16

Сообщение Rainbow » 12.02.2004 (Чт) 20:18

Ну ты даешь! Я тебе простой вариант предлагаю, а ты хочешь сам такую же штуку написать, как MS?

на msdn, кстати, на Си тоже примерчик есть с использованием этой функции, как ты попросил, а делать она, подозреваю, все то же самое будет.

Так что давай быстро сюда скачивать dsofile.exe
Он даже с примером на VB распаковывается!
Учиться - значит открывать для себя то, что уже знаешь. <...> Учить - значит напоминать другим о том, что они знают это также хорошо, как и ты. <...> Лучше всего ты учишь тому, чему тебе самому больше всего надо научиться. (Р. Бах)

SVL
Обычный пользователь
Обычный пользователь
 
Сообщения: 97
Зарегистрирован: 19.12.2002 (Чт) 11:37
Откуда: Russia

Сообщение SVL » 16.02.2004 (Пн) 17:26

Посмотрел я этот activeX. Как и думал, отображает только свойства оффисных документов, на остальные ругается, т.к. позиции не совпадают. Если кто знает, как переписать на VB, подскажите.

Rainbow
Человек-радуга
Человек-радуга
 
Сообщения: 543
Зарегистрирован: 13.05.2003 (Вт) 14:16

Сообщение Rainbow » 17.02.2004 (Вт) 14:28

Ну... тогда тебе надо вот на это посмотреть... Только не спрашивай, как оно работает - не знаю :oops:

http://www.mvps.org/emorcillo/vb6/com/r ... ties.shtml
http://www.mvps.org/emorcillo/vb6/tlb/olelib.shtml
Учиться - значит открывать для себя то, что уже знаешь. <...> Учить - значит напоминать другим о том, что они знают это также хорошо, как и ты. <...> Лучше всего ты учишь тому, чему тебе самому больше всего надо научиться. (Р. Бах)

SVL
Обычный пользователь
Обычный пользователь
 
Сообщения: 97
Зарегистрирован: 19.12.2002 (Чт) 11:37
Откуда: Russia

Сообщение SVL » 17.02.2004 (Вт) 16:45

RainBow, спасибо большое за ссылку. Это как раз то, что нужно. Открывает свойства любого файла и работает, как раз, через функцию StgOpenStorageEx. :P :P :P


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, PetalBot и гости: 16

    TopList