Confirming data

[2o2]

how do i make a script that will check the amount of space in a directory but only check the space occupied by files that end in .doc (microsoft word document files). so far this is what i have but it returns -1???

$docdir = DirGetSize(@MyDocumentsDir & "\*.doc" )

msgbox(0, "d", $docdir)

[2o2]

how do i make a script that will check the amount of space in a directory but only check the space occupied by files that end in .doc (microsoft word document files). so far this is what i have but it returns -1???

$docdir = DirGetSize(@MyDocumentsDir & "\*.doc" )

msgbox(0, "d", $docdir)

cmon peoples heres the script

[AutoItKing]

Search for all the files with the .doc extension in that dir, then get the sizes of them all and add them up.

[m0nk3yI3unz]

KK This should work.

func _DirGetSizeExtension($Dir,$extension="*");Leave off "." before extension.
dim $Files = dirgetsize($Dir&"\")
$Count = 0
$Search = FileFindFirstFile($Dir&"\*."&$extension)
for $i = 1 to $Files[1]
    $Next = FileFindNextFile($Search)
    if @error then
        ExitLoop
    Elseif stringright($Next,3) = $extension then
        $Count += filegetsize($Next)
    EndIf
Next
return $count
endfunc

EDIT: Umm.. Dunno why theres no hiliting (Still new to the forum...)

Edited June 27, 2007 by m0nk3yI3unz

[2o2]

make it clearer, here is my script so far

#NoTrayIcon

;script for marta lesley pearl

progresson("Marta Backup", "Backing Up....")

progressset(10)

sleep(300)

filecopy(@MyDocumentsDir & "\*.doc" , "C:\" ,1)

progressset(70, "", "Checking For Errors...")

sleep(100)

progressoff()

msgbox(0, "Errors", "0 Errors Found!", 1)