Win 7, příkaz subst, ikona disku

[ITCrowd]

Při použití příkazu subst (substituce adresáře jako disk) se ikona disku zobrazí jako nedostupný síťový disk. Disk ale normálně funguje. Lze to nějak jednoduše odstranit?

[Reklama]

[X]

Disk je nejspíš uspaný a probudí se až po nějaké době. Myslím si, že je to normální, moje NASy reagují podobně ... případně si změň ikonu na libovolnou vlastním výběrem.

[ITCrowd]

Uspaný není, protože se na něj přistupuje - je to normální disk, jen je pomocí subst vytvořen disk jiný pro snadnější orientaci.
Je to už 5 hodin od restartu a procházení a stejně "neobživl".
Ikonu samozřejmě změnit můžu, ale je to na třiceti strojích a všechny obcházet se mi nechce. Navíc i když změním ikonu, tak to pořád píše "Síťová jednotka je odpojena".
pro přístup na tento disk stejně použiji link, takže ikona bude jakou si určím
NAS je něco jiného, to mě dělá taky, ale to by byl ekvivalent příkazu "net use". Pokud ten adresář nahrnu na síť a připojím net use, pak je vše v pořádku.
Spíše mě zajímá, jestli to není nějaká blbá chyba woken, nepamatuji se, že by to u W2k a W98 zlobilo. Na XP jsem to nepotřeboval

[Martab]

Téma odemknuto

[ITCrowd]

Tak pokračování:
U Win7 a Win10 sice systém hlásí, že disk je odpojen, ale po poklikání se normálně otevře a soubory jsou přístupné.

Subst

Kód ve vbs vypadá takto:

Kód: Vybrat vše

' mapování disků
Set objNetwork = CreateObject("WScript.Network")
   objNetwork.MapNetworkDrive "N:", "\\FS-Users\Sdílení","False"
' Virtuální disk Y: pomocí subst
   prikaz = "subst Y: N:\Config"
   WshShell.Run prikaz
Set objNetwork = Nothing
Set WshShell = Nothing

U Win11 je to ale jinak - po poklepání systém zahlásí nepřístupnost disku. Přitom z tohoto adresáře si aplikace konfiguraci "natáhne". Bohužel proces spouštění ale trvá neúměrně dlouho.

Nezbylo jiné východisko, než hloupá okna o...bat. Výsledný kód vypadá takto:

Kód: Vybrat vše

' mapování disků
Set objNetwork = CreateObject("WScript.Network")
   objNetwork.MapNetworkDrive "N:", "\\FS-Users\Sdílení","False"
Set WSHReseau = CreateObject("WScript.Network")
  WSHReseau.MapNetworkDrive "Y:", "\\FS-Users\Sdílení\Config", "False"
Set objNetwork = Nothing
Set WSHReseau = Nothing


Pokud správně podotknete, že můžu využít už jednou vytvořený objekt objNetwork, pak tohle nelze. Skript skončí chybou "Vícenásobné připojení k serveru nebo sdílenému prostředku a používání více než jednoho uživatelského jména není povoleno. Odpojte všechna předchozí připojení k serveru nebo sdílenému prostředku a akci opakujte."
Pokud ale vytvořím nový síťový objekt WSHReseau, pak tohle projde. Navíc disk Y: už se tváří jako připojený síťový disk a je normálně přístupný.
mrkvosoftu se zase daří každý druhý systém pohnojit. Vista, Win8, Win11. Proto taky přerušili řadu a Win9 přejmenovali na Win10, neboť už začaly pověsti o nepovedených sudých verzích

Dodatečně přidáno po 9 minutách 21 vteřinách:
A jen dodám - tohle bude fungovat i na lokálním PC. Jediný problém je, že musíte použít síťový název počítače - tedy \\desktop01\složka. Nebude to fungovat, pokud použijete \\localhost\složka. proč to má mrkvosoft takto, nemám ponětí.