RegEXP()

[nht3004]

I want to check whether the string fits a given regular expression pattern : Like a file name *.abc, one line.

Example acice.abc is valid, sncin13r.abc is valid, too.

acimea.jpg is not valid and neither is einvi;.abc

Edited May 2, 2009 by nht3004

[MrMitchell]

What do you have so far? You can start with this: "\w+.abc"

Depends on what other conditions that need to be met...

[nht3004]

What do you have so far? You can start with this: "\w+.abc"

Depends on what other conditions that need to be met...

But I need a path, so it must allow the "\" character!

Can I use this ""[\\\w]+.abc"?

Edited May 2, 2009 by nht3004

[Malkey]

I want to check whether the string fits a given regular expression pattern : Like a file name *.abc, one line.

Example acice.abc is valid, sncin13r.abc is valid, too.

acimea.jpg is not valid and neither is einvi;.abc

It appears a semi-colon ( is a valid character for a file name. Although, it is included in the regular expression as one of the characters not to be in the file name.

A one liner.

;
#cs
    THIS LIST IS OUTDATED
    From http://msdn.microsoft.com/en-us/library/6f69bkd1(VS.80).aspx
    File names cannot contain the following characters:
    * pound (#)
    * percent (%)
    * ampersand (&)
    * asterisk (*)
    * vertical bar (|)
    * backslash (\)
    * colon (:)
    * double quotation mark (")
    * less than (<)
    * greater than (>)
    * period (.)
    * question mark (?)
    * forward slash (/)
    * leading or trailing spaces (' ')
    * names reserved for Windows or DOS (nul, aux, con, com1, lpt1, and so on)
#ce

#include <Misc.au3>

Local $sStr = "d:\Program Files\sncin13r.abc" ; " & '"' & "

;Local $sFilName = StringRegExpReplace($sStr, "^.*\\", "")
;ConsoleWrite("$sFilName = " & $sFilName & @CRLF)

Local $Res = StringRegExp(StringRegExpReplace($sStr, "^.*\\", ""),"[/\\:*\?\t\x22<>\|]")

MsgBox(0, "Result", '"' & $sStr & '" is ' & _Iif($Res = 0, "valid file name", " an invalid file name"))
;

Edit: Replaced single quote with space in RE to disallow leading space in file name.

Edit: To comply with GEOSoft's recommendations in Post #9, the regular expression,

"^([^ ][^#%&*|\\:<>.?/;" & Chr(34) & Chr(9) & Chr(10) & Chr(13) & "]+)(\.abc)$"

is changed to

"[/\\\?\t\x22<>\|]"

Edited May 2, 2009 by Malkey

[GEOSoft]

@Malkey

That list is a bit outdated. The period(.) is valid in a file name. We refer to it as a double extension.

$hFile = @DeskTopDir & "\test.au3.txt"
FileWriteLine($hFile, "As you can see it does work.")
Shellexecute($hFile)

I remember running into this problem when I was parsing filenames in another script.

Edited May 2, 2009 by GEOSoft

[pdaughe]

@Malkey

That list is a bit outdated. The period(.) is valid in a file name. We refer to it as a double extension.

$hFile = @DeskTopDir & "\test.au3.txt"
FileWriteLine($hFile, "As you can see it does work.")
Shellexecute($hFile)

I remember running into this problem when I was parsing filenames in another script.

As have I. A period is also valid in a folder name. What this implies is that you cannot test to see if a string is a file or folder name simply by looking at it. You have to open it and look at its attributes. I've observed several scripts looking for an extension in a name and then "assuming" it's a file....

[GEOSoft]

As have I. A period is also valid in a folder name. What this implies is that you cannot test to see if a string is a file or folder name simply by looking at it. You have to open it and look at its attributes. I've observed several scripts looking for an extension in a name and then "assuming" it's a file....

Also true. I had forgotten about that one. And for the non-beleivers we have

$File = @DeskTopDir & "\test.txt\test.au3.txt"
$hFile = FileOpen($File, 10)
FileWriteLine($hFile, "As you can see it does work.")
FileClose($hFile)
Shellexecute($File)

Now back to our regularly scheduled programing.

[GEOSoft]

another one that is missing from that list is Tab. @Tab or in a RegExp \t

[GEOSoft]

One more update. That list is so far out it's easier to create a new list of illegal characters. #% and maybe more are now allowed as is a space before ".abc" Leading spaces are just stripped by Windows.

If StringRegExp($sFile, "[/\\\?\t\x22<>\|]") Then MsgBox(0, "Oooops", "Illegal Character used")

Edited May 2, 2009 by GEOSoft