FSO: Using regexps?

[Ken Fine]

I'd like my FSO script to act only on files that fit a pattern, files that
include "icon" in the name.
Below, I have FSO code that acts on files that begin with "icon" and have an
extension of .jpg.

I'd prefer it if the script would act in instances where "icon" appeared
anywhere in the filename.

Any help out there?

Thanks...


Dim fso, f, f1, fc, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(folder)
Set fc = f.Files
For Each f1 in fc
if fso.GetExtensionName(f1) = "jpg" and left(f1.name,4) = "icon" Then
%> <img
src=http://whatever.whatever.com/path/<%Response.Write(f1.name)%>><br> <%
end if
Next
%>

 

[Curt_C [MVP]]

use Instr() on the retrieved filename to determine if the string is in it

 

[Guest]

Good advice, thanks Curt. For anyone who needs exact syntax, here's how you
do it:

if fso.GetExtensionName(f1) = "jpg" and instr(1,f1,"icon",1) > 0 Then

I should give this a go with the Regexp method just as a learning thing.

-KF

 

[Curt_C [MVP]]

RegEx is a powerfull thing, I've just never learned it well so I tend to not
use it :}

--
Curt Christianson
Owner/Lead Developer, DF-Software
www.Darkfalz.com

 

[swp]

I'd like my FSO script to act only on files that fit a pattern, files that
include "icon" in the name.
Below, I have FSO code that acts on files that begin with "icon" and have an
extension of .jpg.

I'd prefer it if the script would act in instances where "icon" appeared
anywhere in the filename.

Any help out there?

Thanks...


Dim fso, f, f1, fc, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(folder)
Set fc = f.Files
For Each f1 in fc
if fso.GetExtensionName(f1) = "jpg" and left(f1.name,4) = "icon" Then
%> <img
src=http://whatever.whatever.com/path/<%Response.Write(f1.name)%>><br> <%
end if
Next
%>

the only part you need to change is:
left(f1.name,4) = "icon"

use something like:
instr(lcase(f1.name), "icon")
instead, which returns zero (aka false) if "icon" is not found within
the lowercase string f1.name.

syntax and typos go hand in hand, please don't blame me for either

swp