FileName Validation help plz

[bengalliboy]

All,
I have to check a dir for new arrivals of files. I need to check a certain format and make sure the filenames follows that format. How can I validate all the filenames so that thier name's format is correct? Also I have to do this every 1 hour and to process the new files that just arrived to the same dir, the one I did not process?

Many thanks

[smUX]

The Dir() command would be your best bet, I think...others might have better options but I'll explain mine anyway

if you do d=dir("c:\*.*") then d becomes the filename of the first file in this folder...if you then do MORE "d=dir()" (notice that I haven't included the folder location this time) it will return the next matching filename (and *.* ensures it matches all files)

If you were to set up a function that basically loaded all names into an array, you could then check the array for new names or check names for valid formats and such :-)

BTW, if you put the d=dir() in a 'do/loop while d<>""' then it would repeat until no more files were found...if dir() returns a null ("") value then that means there's no more files to get

[Pradeep1210]

I'm with smUX.
Besides this when you want to check whether a file name is in particular format or not then use the LIKE keyword.

m = Dir("C:\Test\*.*")
If Not UCase(m) Like "A##.DOC" Then    'filters out files like A001.doc, A56.doc etc.
    'invalid file name. etc.
    MsgBox "Invalid file name" & m
Else
    'whatever
End If

Pradeep

[bengalliboy]

Thanks but I can't write any thing. This is the code. What am I missing?

'Create the file
Dim oFile As System.IO.File
Dim oWrite As System.IO.StreamWriter
'Write to the file
oWrite.WriteLine("Write a line to the file")
oWrite.WriteLine(m) 'Write a blank line to the file

[jcis]

What am I missing?

Reading this forum name, that's missing. Try VB.Net Forum Here