Noob question

[PERTU]

Hi,

I have a folder with videos named like: DpRiley01.wmv, DpRiley02.wmv, Dallara01.wmv, Dallara02.wmv etc...

I want my script to find the number of the next video I save. For example my next DpRiley video would be number 03.

The way I'm trying to do it is to use _FileListToArray to put all the filename in an array, remove the last sixth character, count how many times DpRiley is in the Array and add +1 to this number.

I don't know how to count how many times DpRiley is in the array.

Here is my Code so far:

$video = "DpRiley"
$FileList=_FileListToArray("C:\Users\Olivier\Videos")
If @Error=1 Then
    MsgBox (0,"","No Folders Found.")
    Exit
EndIf
If @Error=4 Then
    MsgBox (0,"","No Files Found.")
    Exit
EndIf

_ArrayTrim($FileList, 6, 1)

$FileCurentVersion = "I don't know how to find it"

$FileNewVersion = $FileCurentVersion + 1
MsgBox (0,"", $FileNewVersion)

Thanks for helping me.

[sahsanu]

You can search "DpRiley" at the same time you list the files with _FileListToArray. Take a look to the help file and pay attention to "$array[0] = Number of Files\Folders returned". I hope this helps ;-)

#include <file.au3>
$video = "DpRiley"
$FileList=_FileListToArray("C:\Users\Olivier\Videos",$video & "*.wmv",1)

If @Error=1 Then
    MsgBox (0,"","No Folders Found.")
    Exit
EndIf
If @Error=4 Then
    MsgBox (0,"","No Files Found.")
    Exit
EndIf

$FileNewVersion = $FileList[0] + 1
MsgBox (0,"", $FileNewVersion)

Edited May 4, 2010 by sahsanu

[Malkey]

This example works on the theory that at the start the file to be saved will be DpRiley01.wmv

If DpRiley01.wmv exists the next file name will be DpRiley02.wmv

And again, if DpRiley02.wmv exists the next file name will be DpRiley03.wmv

And again and again.

Local $video, $sDir, $sNum, $sVideoName

$video = "DpRiley"
$sDir = @ScriptDir & "\"; "C:\Users\Olivier\Videos\"
$sNum = 1

$sVideoName = $sDir & $video & StringRight("0" & $sNum, 2) & ".wmv" ; Edit added this "." before wmv

While FileExists($sVideoName) = 1
    $sNum += 1
    $sVideoName = $sDir & $video & StringRight("0" & $sNum, 2) & ".wmv"
WEnd

; Test:- If file exists, then number in filename is incremented on next script run.
;$file = FileOpen($sVideoName,10)
;FileClose($file)

MsgBox(0, "", 'Next new video name is "' & $sVideoName & '"' & @CRLF & _
        "Next number is " & StringRight("0" & $sNum, 2))

Edit: Added a missing "." before first mentioned wmv extension.

Edited May 4, 2010 by Malkey

[PERTU]

Thanks to both of you.

sahsanu:

I tried to copy paste your code and didn't work. I tried to understand it but it is difficult. I'll try again once I'm more awake

Malkey:

It worked when I removed "@ScriptDir & "\"; ".

Right now I understand the logic behind this code. I'll just have to go check the parameters to all functions in details to learn about this code.