Windows batch program - check for files

[gmoorthy]

I need a window script which will check if I have 4 files existing in a folder with current date. The file naming convention are

File1_yyyymmdd.csv
File2_yyyymmdd.csv
file3_yyyymmdd.csv
File4_yyyymmdd.csv

 

[Andrzejek]

Try this:

Option Explicit

Sub CheckFiles()
Dim strPath As String
Dim strFile As String
Dim i As Integer

strPath = [red]"C:\Test\"[/red]
strFile = Dir(strPath & "*.csv")

Do While strFile <> ""
    For i = 1 To 4
        If LCase(strFile) = "file" & i & "_yyyymmdd.csv" Then
            MsgBox "Bingo!, File is here: " & strFile
            Exit For
        End If
    Next i
    strFile = Dir
Loop
 
End Sub

---- Andy

There is a great need for a sarcasm font.

 

[mintjulep]

Change

If LCase(strFile) = "file" & i & "_yyyymmdd.csv" Then

to

If LCase(strFile) Like "file?_" & format(date,"yyyymmdd") & ".csv"

 

[gmoorthy]

Thanks a lot

This is VB script , how do I do it using
Dos commands. Using find commands etc

 

[SkipVought]

Forum329

Skip,
[sub]
Just traded in my OLD subtlety...
for a NUance![/sub]
"The most incomprehensible thing about the universe is that it is comprehensible" A. Einstein

 

[strongm]

>This is VB script

Actually it isn't, it is VBA. Hardly surprising since this is the VBA forum. And, since you want DOS, you don't want the VBScript forum either. Try forum779

 

[gmoorthy]

Thanks