WebBrowser as ShellFolder

[Sergeant Pepper]

Пытаюсь использовать WebBrowser control в качестве проводника на форме.
Вид отображения папок и файлов можно поменять с помощью свойства CurrentViewMode, например вид Таблица (Details):

Код: Выделить всё

WebBrowser1.Document.CurrentViewMode  = 4

Но я не знаю как установить классический вид (без списка типичных задач). Есть и свойство, отвечающее за это WebBrowser1.Document.ViewOptions, но установить нужное значение не получается, т.е.

Код: Выделить всё

WebBrowser1.Document.ViewOptions = WebBrowser1.Document.ViewOptions Or SFVVO_WIN95CLASSIC

вызывает ошибку

Wrong number of arguments or invalid property assignment (Error 450)

Возможно ли выполнить задуманное в VB?


(Const SFVVO_WIN95CLASSIC = 64)

[Antonariy]

ViewOptions - readonly. Через объекты Shell32 походу нельзя. Свойства отображения папок устанавливаются через меню. Можно попробовать найти соответствующий раздел реестра, поменять настройки там и перезагрузить папку, но копаться в настройках папок все равно, что копаться в настройках IE, не очень рекомендуется.

[Sergeant Pepper]

Видимо для отдельного окна ViewOptions не изменить. Жаль.
Но можно ограничить размер WebBroser Control, тогда "Common Tasks" скрывается. Оставлю пока так.

[RayShade]

Мне кажется что это изначально кривое использование этого контрола От того и проблемы все.

[Sergeant Pepper]

Мне кажется что это изначально кривое использование этого контрола От того и проблемы все.

Почему вы считаете, что кривое?
Да и проблем-то уже нет никаких. Все замечательно работает.