file organizer

[datkewlguy]

Well if any of you are like me then you're desktop is constantly getting cluttered with little autoit scripts/ their compiled .exes. Okay, maybe im a lone on this but heres what i was thinking. By using filesearch in the directory where the program is opened, it should search for all .exes/au3s and create a directory with the name of the au3/exe and move them into that directory. Also, have it keep searching until all of the files are found...

Okay, if you didnt quite get that then ill try and go through it...

this program is on your desktop next to test.au3 and test.exe

once opened, the program will create a folder on your desktop called test and move test.au3/test.exe into this folder, and continue to do so...

I've gotten pretty cloes but things will glitch up when it tries to move itself...

if anyone has any ideas that'd be great... Thanks...

[Valuater]

no, all my au3/exe files are in a folder when i save them.. try this

;find the file

If Not WinExists ( "title" [, "text"] ) Then

;copy the file

good luck

Edited March 24, 2005 by Valuater

[datkewlguy]

that's not really what i meant...

[zcoacoaz]

i have a scripts folder which has multiple sub folders for my projects and one folder for my little examples and tests

[MHz]

If your Desktop get too cluttered, change it. (It's just a folder)

One for scripts and one for other stuff. Gets rid of cluttered windows also.

$desktop0 = 'C:\Documents and Settings\Desktop'
$desktop1 = 'C:\Documents and Settings\Desktop1'
$desktop2 = 'C:\Documents and Settings\Desktop2'

If Not FileExists($desktop1) Then
    If Not FileExists($desktop2) Then
        DirCreate($desktop1)
        Sleep(1000)
    EndIf
EndIf

ProcessClose('explorer.exe')

If FileExists($desktop1) Then
    DirMove($desktop0, $desktop2)
    Sleep(10)
    DirMove($desktop1, $desktop0)
    ToolTip('Standard Desktop', @DesktopWidth/2, @DesktopHeight/2)
ElseIf FileExists($desktop2) Then
    DirMove($desktop0, $desktop1)
    Sleep(10)
    DirMove($desktop2, $desktop0)
    ToolTip('Autoit3 Desktop', @DesktopWidth/2, @DesktopHeight/2)
EndIf

Sleep(5000)
ToolTip('')
If Not ProcessExists('explorer.exe') Then
    Run('explorer.exe')
EndIf