1

Тема: HTA: Виртуальный жесткий диск

Подскажите, а как изменить иконку и название виртуального жёсткого диска, созданного subst. Я пробовал использовать autorun.inf, но такой вариант не работает.

2

Re: HTA: Виртуальный жесткий диск

Я думаю Вам помогут методы

EnumNetworkDrives
MapNetworkDrive
RemoveNetworkDrive

объекта WshNetwork

Справочная информация:
http://msdn.microsoft.com/en-us/library … s.85).aspx
http://msdn.microsoft.com/en-us/library … s.85).aspx
http://msdn.microsoft.com/en-us/library … s.85).aspx

Option Explicit
Dim WshNetwork, NetworkDrives
Set WshNetwork = CreateObject("Wscript.Network")
Set NetworkDrives = WshNetwork.EnumNetworkDrives
WshNetwork.RemoveNetworkDrive "X:", True
WshNetwork.MapNetworkDrive "X:", "\\server\path\"
MsgBox "Disk mapped",vbInformation
Передумал переделывать мир. Пашет и так, ну и ладно. Сделаю лучше свой !

3

Re: HTA: Виртуальный жесткий диск

По моему здесь речь идёт о сетевом диске. Но ведь вопрос идёт о локальном

4

Re: HTA: Виртуальный жесткий диск

Ottiwell_Wood, лично мне этого не удавалось добиться.

5

Re: HTA: Виртуальный жесткий диск

Виноват. Не сразу дошёл смысл вопроса. Видать усталость на работе сказывается. Скорее всего иконку и название поменять нельзя.

Передумал переделывать мир. Пашет и так, ну и ладно. Сделаю лучше свой !

6

Re: HTA: Виртуальный жесткий диск

Видимо никто не читает первый пост.

7

Re: HTA: Виртуальный жесткий диск

Ottiwell_Wood пишет:

Видимо никто не читает первый пост.

Видимо кому то упорно лень поискать ответы в глобальной сети интернет и этот кто то надеется, что за него всё решат другие .

http://otvety.google.ru/otvety/thread?t … 465ab635c3

Передумал переделывать мир. Пашет и так, ну и ладно. Сделаю лучше свой !

8

Re: HTA: Виртуальный жесткий диск

Такой вариант тоже не работает. А существуют ли аналоги subst?

9

Re: HTA: Виртуальный жесткий диск

Проверил. На моей Win 7 x64 работает.

Диск X: смонтирован к диску C:\ через subst

Более подробная инструкция.
http://www.liutilities.com/products/reg … aks/11101/

Скриншот в доказательство.
http://dc133.file.qip.ru/img/h9Xs0h16/1_online.png?rnd=0.06212718027630082&sizeM=7

Передумал переделывать мир. Пашет и так, ну и ладно. Сделаю лучше свой !

10

Re: HTA: Виртуальный жесткий диск

Xameleon, спасибо.

Но у меня не всё получилось, в частности, с Custom Icon:
How to Assign a Custom Icon and Label to a Drive Letter (Windows)
LABEL для SUBST-диска задаётся, Custom Icon — у меня не сработало.
How to Customize Folders with Desktop.ini (Windows)
Custom Icon для папки  — применяется, на SUBST-диск это изменение не отображается.

P.S. Windows XP SP3.

11

Re: HTA: Виртуальный жесткий диск

Вот я о том же. Программа должна быть кроссплатформенной.

12

Re: HTA: Виртуальный жесткий диск

alexii пишет:

... LABEL для SUBST-диска задаётся, Custom Icon — у меня не сработало.
...
P.S. Windows XP SP3.

Windows Vista Enterprise SP3. Все с точностью до наоборот. иконка диска меняется, метка - нет.
Windows XP Professional SP3. Не устанавливается ни то ни другое.

( 2 * b ) || ! ( 2 * b )

13

Re: HTA: Виртуальный жесткий диск

2 Rumata & Ottiwell_Wood & alexii: Возможно глупый или странный вопрос, но... - перезагружаться после этого пробывали ? Или перезапускать explorer сам ?

Передумал переделывать мир. Пашет и так, ну и ладно. Сделаю лучше свой !

14

Re: HTA: Виртуальный жесткий диск

Xameleon, я только F5 нажимал, рассчитывая что сработает и так. Мысль о перезагрузке была, но было лень ради этого )))

( 2 * b ) || ! ( 2 * b )

15

Re: HTA: Виртуальный жесткий диск

2 Rumata: Вот он корень зла - ЛЕНЬ ! Она же двигатель прогресса (иногда).

Передумал переделывать мир. Пашет и так, ну и ладно. Сделаю лучше свой !

16

Re: HTA: Виртуальный жесткий диск

2Xameleon: нет, не пробовал. Я полагал, что, коль DefaultLabel из DriveIcons отрабатывает сразу после обновления окна Проводника (по F5), то и иконка должна была бы тоже сразу отработать.

Попробую вечером с перезагрузкой.