Jump to content
Valnurat

RunWait do not stop.

Recommended Posts

Valnurat

I have a task that I need to clear terminated users home directory in the company. If the path to the folder have more than 256 characters I use robocopy to delete the folder. My function is this:

Func _RoboCopy_NoAD_Accounts($sFolderToDel)
    $prog = @SystemDir & '\RoboCopy.exe'
    $options = '/s /mir'
    $logg = '/LOG+:LogPath'
    Local $sStr = StringReverse($sFolderToDel)
    $sStr = StringReverse(StringMid($sStr,StringInStr($sStr,'\'),StringLen($sStr)))
    if DirCreate($sStr & 'empty_dir') <> 0 Then
        Local $source = $sStr & 'empty_dir'
$sComputername & '.log /NFL /NDL')
        Return RunWait('"' & $prog & '" "' & $source & '" "' & $sFolderToDel & '" ' & $options, "", @SW_MAXIMIZE) ; & ' ' & $logg & $sComputername & '.log /NFL /NDL')
        DirRemove($source)
        DirRemove($sFolderToDel)
    EndIf
EndFunc   ;==>_RoboCopy_NoAD_Accounts

and I call it like this:
 

if DirRemove($aListOfAllHomeFolders[$iIndex][0] & "\" & $aListOfAllhomeFolders[$iIndex][1], 1) <> 1 Then
                    If _RoboCopy_NoAD_Accounts($aListOfAllHomeFolders[$iIndex][0] & "\" & $aListOfAllhomeFolders[$iIndex][1]) <> 2 Then
                        _FileWriteLog($hFile, 'Robo Failed to delete ' & $aListOfAllHomeFolders[$iIndex][0] & "\" & $aListOfAllhomeFolders[$iIndex][1])
                    Else
                        _FileWriteLog($hFile, 'Robo Succeed to delete ' & $aListOfAllHomeFolders[$iIndex][0] & "\" & $aListOfAllhomeFolders[$iIndex][1])
                        $iTotalSize = $iTotalSize + $iSize
                    EndIf
                Else
                    _FileWriteLog($hFile, 'Succeed to delete ' & $aListOfAllHomeFolders[$iIndex][0] & "\" & $aListOfAllhomeFolders[$iIndex][1])
                    $iTotalSize = $iTotalSize + $iSize
                EndIf

But if the call to RoboCopy function and it is meet with a Error 5 (Access denied) is does not return it just continue to try to delete.


Yours sincerely

Kenneth.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

  • Similar Content

    • mar3011
      By mar3011
      hello, I want to set in the inputbox field random key from the keyboard to which the function will be assigned, for example F4 function start notepad ALT + A function start notepad for one function. Thank you for any help.  
    • JuanFelipe
      By JuanFelipe
      Cambiar a español Hello friends, I need help with a problem I have, I want to know if there is any way to update a GUI already running, that is I have a GUI of a certain size and with a button I would like to enlarge it:
      example: $ form1 = GUICreate ("", 200,100,0,0)   When you press the button, the gui increases its size, and actuates the new size.
    • BogdanNicolescu
      By BogdanNicolescu
      While 1 / / / A whole bunch of codes found in help and here: https://www.autoitscript.com/autoit3/docs/ / / / WEnd OR:

       
      HotKeySet("{ESC}", "Terminate") While 1 MouseClick("Right",674,422) MouseClick("Left",673,447) Sleep(2000) / / / A whole bunch of codes found in help and here: https://www.autoitscript.com/autoit3/docs/ / / / MouseClick("Left",675,339) SLeep(3000) WEnd Func Terminate()     Exit 0 EndFunc  
      Sorry if i should't let this here to be found by newbies like me -.-'
    • santoshM
      By santoshM
      Dear friends i am facing a problem , i have created a window in autoit some time it is moving with the mouse curser even if iam not clicking the window 
    • sumanth1980
      By sumanth1980
      Here i am wrote a simple lines to install basic applications but when i clicked on one application/program to install it was working fine but when i cancel the program in the middle to install another program it was not working. I am not an expert in this but i want a solution for this ... Can any one help me on this....
      ORG-1.au3
×