senden Sie Dateinamen in der Mappe in der zufälligen Ordnung

  • [autoit]


    #include <Array.au3>
    #include <File.au3>
    For $i = 0 To 99
    $iFlag = Random(0,1,0)
    ConsoleWrite("line 1" & @LF) ; Line 1
    ConsoleWrite("line 2" & @LF) ; Line 2
    If $iFlag > 0.7 Then

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    $Dir = 'C:\Windows\System32\'
    $Files = _FileListToArray($Dir, '*', 1)
    Sleep(1000)
    ConsoleWrite($Dir & $Files[Random(1, $Files[0], 1)]) ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    EndIf
    ConsoleWrite("line 5" & @LF) ; Line 5

    [/autoit][autoit][/autoit][autoit]

    Next

    [/autoit]


    Können Sie bitte helfen?
    Ich brauche Zufällig, um Dateinamen nicht zu wiederholen, der mit von Zeit zu Zeit mit jedem Zyklus geschieht.

    Spoiler anzeigen

    send file names in folder in random order

    Can you help please?
    I need Random to not repeat file names, which happens with from time to time with each cycle.

    2 Mal editiert, zuletzt von Henaro (2. Februar 2012 um 07:29)

  • Hallo Henaro,

    deine zufällige Wiedergabe aller Dateien kannst du s realisieren:

    Spoiler anzeigen
    [autoit]

    #include <File.au3>
    #include <Array.au3>

    [/autoit] [autoit][/autoit] [autoit]

    $sDir = @SystemDir & "\"
    $aFiles = _FileListToArray($sDir, '*', 1)
    _ArrayDelete($aFiles,0)
    Do
    $iFlag = Random(0,1,0)
    ;ConsoleWrite("line 1" & @LF) ; Line 1
    ;ConsoleWrite("line 2" & @LF) ; Line 2
    If $iFlag > 0.7 Then
    ;_ArrayDisplay($aFiles)
    $iRandom = Random(0, UBound($aFiles)-1,1)
    ;ConsoleWrite($iRandom & @TAB)
    ConsoleWrite($sDir & $aFiles[$iRandom]& @CRLF) ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
    _ArrayDelete($aFiles,$iRandom)
    Sleep(1000)
    EndIf
    ;ConsoleWrite("line 5" & @LF) ; Line 5
    until UBound($aFiles) = 0

    [/autoit] [autoit][/autoit] [autoit][/autoit]

    mfg autoBert