Newsgroup: it.comp.os.win.xp
Titolo: COME GESTIRE, DOVE SONO, E COME RIUSCIRE A MODIFICARLI, GLI ATTRIBUTI DEI FILE E DELLE CARTELLE?

COME GESTIRE, DOVE SONO, E COME RIUSCIRE A MODIFICARLI, GLI ATTRIBUTI
DEI FILE E DELLE CARTELLE?
Salve a tutti, nella ricerca di informazioni nel tempo ho scricato
molte pagine HTML, ora mi trovo a riordinare le cartelle che nono molte
ed avvolte anche molto annidate e su piu'HD, le CARTELLE ASSOCIATE AI
FILE HTML, MI FANNO MOLTA CONFUSIONE, APRENDO UNA ARTELLA NON E'
IMMEDIATAMENTE CHIARO QUALI SIANO CARTELLE VERE CON CONTENUTI E
CARTELLE ASSOCIATE AI FILE HTML, PER CUI VOTTEI TROVARE IL MODO DI
INDIVIDUARE LE CARTELLE ASSOCIATE AI FILE HTML E RENDERLE INVISIBILI.
E COME SI FA A FARLI CERCARE IN TUTTE LE CARTELLE E SOTTO CARTELLE?
GRAZZIE, E COMPLIMENTI A CHI CI CAPISCE QUALCOSA IN QUESTE COSE!!!!
:-)

 DEI FILE E DELLE CARTELLE?
Tasto destro / proprieta'......
ps
se urli un po' di piu' ti sentono fino all'altro ufficio.... :)

 ASSOCIATE AI FILE HTML E RENDERLE INVISIBILI.
Se sai smanettare un pochino con degli scripts e' anche abbastanza semplice
(se NON ... non incominciare nemmeno che il risultato sara' solo un mal di testa)
quello che farei io
Di solito una cartella associata ha lo stesso nome del file HTM
percio farei una scansione della cartella per i file htm  e controllerei
se c'e' una folder col nome identico e poi la nasconderei cosi (vbs)
  Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.GetFolder("C:\WINDOWS\TEMP\TEST")
      f.attributes = f.attributes +2
'Arguments
'object
'Required. Always the name of a File or Folder object.
'newattributes
'Optional. If provided, newattributes is the new value for the attributes of the specified 'object.
'Settings
'The newattributes argument can have any of the following values or any logical 'combination of the following values:
'Constant Value Description
'Normal 0 Normal file. No attributes are set.
'ReadOnly 1 Read-only file. Attribute is read/write.
'Hidden 2 Hidden file. Attribute is read/write.
'System 4 System file. Attribute is read/write.
'Volume 8 Disk drive volume label. Attribute is read-only.
'Directory 16 Folder or directory. Attribute is read-only.
'Archive 32 File has changed since last backup. Attribute is read/write.
'Alias 64 Link or shortcut. Attribute is read-only.
'Compressed 128 Compressed file. Attribute is read-only.
PS:
ecco un file fatto al volo  NON ho il tempo di testarlo ..fallo tu
porta un paio di file.htm con relativa cartella in c:\windows\temp
e prova a lanciare questo file vbs qui sotto ... se ti va bene e non riesci
a farlo tu posta che te ne faccio uno che basta trascinarci sopra
le Folder contenenti i file incriminati
sDirectory = "C:\WINDOWS\TEMP"
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set oFolder = oFSO.GetFolder(sDirectory)
Set objGSF = oFolder.SubFolders
For Each oFile In oFolder.Files
  If InStr(UCase(oFile.Name), ".HTM") Then
Set f = ofso.GetFile(oFile)
str = oFile.Name
str = Left(str,InStrRev(str,".") -1)
Msgbox str
For Each strGSF in objGSF
Msgbox strGSF.Name
If strGSF.Name = str&"_file" Then
strGSF.attributes = strGSF.attributes +2
  End If
Next
 End if
Next
'Copia incolla su notepad e salva con estensione .vbs
'tutti i file (*.*)  poi ci clicchi sopra. (per esempio Test.vbs)
'se ti da' errore disattiva l'antivirus
PS:
togli i Msgbox   per un uso effettivo r OCCIO che l'estensione dei
file sia EFFETTIVAMENTE   *.htm   e NON altro
--
Fosco