Newsgroup: it.comp.aiuto
Titolo: Rinomina dei file...aiuto!!

ciao...ho da poco mess winxp pro sp1...prima avevo win2000. avendo un sito
internet mi ero chiaramente salvato su un cd i file prima di formattare...e
me li sono ricopiati pari pari qua su xp. ora...sto cazzo di xp mi ha
cambiato i nomi dei file...ad esempio un file che prima si chiamava
"BOY-boston131280.htm" adesso si chiama "BOY_BOSTON131280.HTM" in pratica mi
ha messo tutto in maiuscolo! infatti il trattino mi è diventato un
underscore e i link sono quindi andati a puttane! come faccio a fargli
mettere tutto in minuscolo come di norma?!
please è molto importante...grazie
--
MLK (Luca)
================================
"going going...but never GONE!"
================================

 mettere tutto in minuscolo come di norma?!
Fammi capire: se guardi il contenuto del cd tu leggi "BOY-boston131280.htm",
se poi copi questo file su hd, diventa "BOY_BOSTON131280.HTM" ?
Ciao,
Massimo
--
Subitoinrete.com (
http://www.subitoinrete.com
)
Freenet | Flat/Ricaricabile | Domini | Hosting | Server Dedicati

no...anche se guardo il contenuto del cd i file sono in maiuscolo...ma sono
sicuro che con win2000 quando aprivo il cd ( per controllare che ci fosse
tutto) i file erano in minuscolo...
--
MLK (Luca)
================================
"going going...but never GONE!"
================================
"Kaan" <kaanR...@MEsubitoinete.com> ha scritto nel messaggio
news:TJOAb.63262$AX1.2...@news1.tin.it...


 controllare che ci fosse tutto) i file erano in minuscolo...
Beh XP non c'entra nulla, hai sbagliato a fare il cd con quel formato (ora
non ricordo quale)

 please è molto importante...grazie
Prova con un "mass file renamer" (definizione che mi sono inventato ora,
credo). Ad esempio Lupas Rename, che ti permette du fare un po' quel che
vuoi coi nomi dei file e di cambiarne determinati parametri (maiusc-minusc
ecc.) Vedi 
http://www.azheavymetal.com/~lupasrename/news.php

grazie mille provo dopo! il cd l'ho fatto con nero in formato
normalissimo...senza robe strane come l'udf o cose varie...
--
MLK (Luca)
================================
"going going...but never GONE!"
================================
"zibibbo" <cmpie...@BaStAsPaMvirgilio.it> ha scritto nel messaggio
news:SQXAb.63902$AX1.2...@news1.tin.it...


funziona!! grazie!


"MLK (Luke)"
rjhExtensions v1.3
www.rjhsoftware.com
Copia Path nella clipBoard
Crypta files con password
Rinomina
Output di directory su txt
Rinomina Files
ecc
 
www.rjhsoftware.com
oppure :
questo sotto sostituisce TUTTI  gli _  con  -
ATTENZIONE che lo fa anche con tutte le subfolders
partendo in questo caso da c:\windows\temp
Insomma se hai un file chiamato CIPPO_LIPPO.TXT in
c:\windows\temp\spare verra' rinominato
c:\windows\temp\spare\CIPPO-LIPPO.TXT
volendo si puo' anche fare uno script per rinominare tutti i
file in minuscolo
sBaseFolder = "c:\windows\temp" : bFiles = True
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set oSh = CreateObject("WScript.Shell")
Dim sList : sList = ""
GetNames(sBaseFolder)
aPaths = Split(sList, vbCrLf)
Set d = CreateObject("Scripting.Dictionary")
d.Add "_", "-"
On Error Resume Next
For i = UBound(aPaths)-1 To 0 Step -1
  sPath = aPaths(i)
  sName = Right (sPath, Instr(StrReverse(sPath), "\") - 1)
  sTest = Isl2Rom(sName)
  If sTest <> sName Then
    If bFiles Then
      Set f = oFSO.GetFile(sPath)
    Else
      Set f = oFSO.GetFolder(sPath)
    End If
    f.Name = sTest
    If Err.Number <> 0 Then
      WScript.Echo "could not rename", sPath
      Err.Clear
    End If
  End If
Next
WScript.Echo "Finished!"
Sub GetNames(sFolderSpec)
  With oFSO.GetFolder(sFolderSpec)
    If bFiles Then
      For Each oFile In .Files
        sList = sList & oFile.Path & vbCrLf
      Next
    End If
    For Each oFolder In .SubFolders
      If Not bFiles Then
        sList = sList & oFolder.Path & vbCrLf
      End If
      GetNames (oFolder.Path)
    Next
  End With
End Sub
Function Isl2Rom(sData)
 Dim k
 Isl2Rom = sData
 For Each k in d.Keys
  'wscript.echo k,d.Item(k)
  Isl2Rom = Replace(Isl2Rom,k,d.Item(k))
 Next
End Function
'Copia incolla su notepad e salva con estensione .vbs
'tutti i file (*.*)  poi ci clicchi sopra. (per esempio rename.vbs)
--
Fosco