Jump to content

candrews911

Members
  • Posts

    1
  • Joined

  • Last visited

Posts posted by candrews911

  1. Skavenger,

     

    I would love if you could upgrade this script to the cccleaner 2.0.9 version.

     

    They changed the way they hold the folder names in the registry.

     

    I this this is an awesome script.

     

    I would downgrade to CCleaner 2.0.6 just to use it..

     

    THX

     

    C

     

    OK guys,

     

    here is my solution.

     

    automatically add some special folders from all found local profiles to "custom folders" in CCleaner.

     

    Here is the code:

     

     

    Dim fso, f, f1, fc, sSet wso = CreateObject("WScript.Shell")Set fso = CreateObject("Scripting.FileSystemObject")Set f = fso.GetFolder("c:\Documents and Settings")Set fc = f.SubFoldersFor Each f1 in fc  s = s & "c:\Documents and Settings\" & f1.name & "\local settings\temp" & "|"Next'direct write to Registrywso.RegWrite "HKCU\Software\VB and VBA Program Settings\CCleaner\Options\CustomFolders", s'write in fileset f = fso.OpenTextFile("ccl-custom-folders.reg", 2, True)f.WriteLine "Windows Registry Editor Version 5.00" f.WriteLine "" f.WriteLine "[HKEY_CURRENT_USER\Software\VB and VBA Program Settings\CCleaner\Options]" f.WriteLine chr(34)&"CustomFolders"&chr(34)&"="&chr(34)& Replace(s,"\","\\")&chr(34)

     

     

    Please take a look at the definitions of foldernames. And if necessarily change it to yours.

     

    Safe the code as "ccl-custom-folders.vbs" and run it.

     

    After this you can start CCleaner to clean all crap from all profiles.

     

    Greetz from germany to all CCleaner-Users.

     

    SkAvEnGeR

×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.