search

tiagosr / cfg-loader

Automatically exported from code.google.com/p/cfg-loader
0 stars 0 forks source link

Rename vbs files to folders #16

Open GoogleCodeExporter opened 9 years ago

GoogleCodeExporter commented 9 years ago 
I had many games before wbfs_files version 2.0, which create GAMEID_TITLE
subdirectories by default. In other words, I had many wbfs files in one
same FAT directory.
I added some lines to middle of fast_rename_move.vbs to move the wbfs files
to subdirectories and rename the other too.
I want to suggest you can improve this and add to the next wbfs_file_x.x
package.

'# ---->(there is the original lines before this)
Set f = fso.GetFolder(strParentFolder)
Set sf = f.SubFolders

'# ---->Here starts the added portion.
Set fil = f.Files   
For Each arquivo in fil
    if (left(right(arquivo.name,4),3)="wbf") Then
        strNewFolder = f & "\[" & left(arquivo.name,6) & "]"
        if not fso.FolderExists(strNewFolder) Then
            Call fso.CreateFolder(strNewFolder)
        End If
        arquivo.Move (strNewFolder & "\" & arquivo.name)
    End If
Next
'# Here ends the add portion.

For Each folder in sf         '# This is a fraction from original
  if (len(folder.name) >= 6) Then        '# This is a fraction from original
'# There is more lines after here from original file.

Original issue reported on code.google.com by eule...@gmail.com on 31 Jan 2010 at 6:31

Attachments:

GoogleCodeExporter commented 9 years ago 
leave all files in one folder will show list faster. each game a sub folder not 
good for 
performance.

Original comment by noboo...@gmail.com on 7 Mar 2010 at 10:19

GoogleCodeExporter commented 9 years ago 
This should be closed, you can decide whether you want directories or not.

Original comment by school.p...@gmail.com on 4 Jun 2010 at 5:09