File operation with user-set wildcards

[kenny]

I want to delete files but I also want to set the wildcards manually. Look at
this example:

If TextBox1.Text = "" Then
Else
For Each foundFile As String In
My.Computer.FileSystem.GetFiles(curdir & "\_res_original", _
FileIO.SearchOption.SearchAllSubDirectories, TextBox1.Text)
My.Computer.FileSystem.DeleteFile(foundFile)
Next
End If

------------

TextBox1.Text should look like <"*.exe", "*.txt", "*.ini">
It works with one extension but if I specify many of them, vb gives an error
that there is an illegal character. I suppose it handles the commas not
correctly.

Thanks for any help

[gene kelley]

On Thu, 24 Aug 2006 06:56:01 -0700, kenny <ke***@discussions.microsoft.comwrote:

>I want to delete files but I also want to set the wildcards manually. Look at
this example:

If TextBox1.Text = "" Then
Else
For Each foundFile As String In
My.Computer.FileSystem.GetFiles(curdir & "\_res_original", _
FileIO.SearchOption.SearchAllSubDirectories, TextBox1.Text)
My.Computer.FileSystem.DeleteFile(foundFile)
Next
End If

------------

TextBox1.Text should look like <"*.exe", "*.txt", "*.ini">
It works with one extension but if I specify many of them, vb gives an error
that there is an illegal character. I suppose it handles the commas not
correctly.

Thanks for any help

The argument for wildcard parameters is a string array:
Dim FileTypes As String() = {"*.exe", "*.txt", "*.ini"}

Change ....SearchAllSubDirectories, TextBox1.Text
to
.....SearchAllSubDirectories, FileTypes
Gene

[kenny]

Thanks.
But how can I convert the string from the textbox into a string array so it
will be recognized as separated wildcards?

"gene kelley" schrieb:

>

The argument for wildcard parameters is a string array:
Dim FileTypes As String() = {"*.exe", "*.txt", "*.ini"}

Change ....SearchAllSubDirectories, TextBox1.Text
to
.....SearchAllSubDirectories, FileTypes
Gene

[Peter Proost]

This returns a string array:

TextBox1.Text.split(","c)

hope this helps

Greetz, Peter


--
Programming today is a race between software engineers striving to build
bigger and better idiot-proof programs, and the Universe trying to produce
bigger and better idiots. So far, the Universe is winning. (Rich Cook)

"kenny" <ke***@discussions.microsoft.comschreef in bericht
news:7C**********************************@microsof t.com...

Thanks.
But how can I convert the string from the textbox into a string array so

it

will be recognized as separated wildcards?

"gene kelley" schrieb:

The argument for wildcard parameters is a string array:
Dim FileTypes As String() = {"*.exe", "*.txt", "*.ini"}

Change ....SearchAllSubDirectories, TextBox1.Text
to
.....SearchAllSubDirectories, FileTypes
Gene

[kenny]

Alright, it works.
I forgot to write the c, that was the problem.
Thank you both for helping me!

"Peter Proost" schrieb:

This returns a string array:

TextBox1.Text.split(","c)

hope this helps

Greetz, Peter


--
Programming today is a race between software engineers striving to build
bigger and better idiot-proof programs, and the Universe trying to produce
bigger and better idiots. So far, the Universe is winning. (Rich Cook)

"kenny" <ke***@discussions.microsoft.comschreef in bericht
news:7C**********************************@microsof t.com...

Thanks.
But how can I convert the string from the textbox into a string array so

it

will be recognized as separated wildcards?

"gene kelley" schrieb:

>
>
The argument for wildcard parameters is a string array:
Dim FileTypes As String() = {"*.exe", "*.txt", "*.ini"}
>
Change ....SearchAllSubDirectories, TextBox1.Text
to
.....SearchAllSubDirectories, FileTypes
>
>
Gene
>

[Peter Proost]

You're welcome

Greetz, Peter

--
Programming today is a race between software engineers striving to build
bigger and better idiot-proof programs, and the Universe trying to produce
bigger and better idiots. So far, the Universe is winning. (Rich Cook)

"kenny" <ke***@discussions.microsoft.comschreef in bericht
news:8C**********************************@microsof t.com...

Alright, it works.
I forgot to write the c, that was the problem.
Thank you both for helping me!

"Peter Proost" schrieb:

This returns a string array:

TextBox1.Text.split(","c)

hope this helps

Greetz, Peter


--
Programming today is a race between software engineers striving to build
bigger and better idiot-proof programs, and the Universe trying to

produce

bigger and better idiots. So far, the Universe is winning. (Rich Cook)

"kenny" <ke***@discussions.microsoft.comschreef in bericht
news:7C**********************************@microsof t.com...

Thanks.
But how can I convert the string from the textbox into a string array

so

it

will be recognized as separated wildcards?
>
"gene kelley" schrieb:


The argument for wildcard parameters is a string array:
Dim FileTypes As String() = {"*.exe", "*.txt", "*.ini"}

Change ....SearchAllSubDirectories, TextBox1.Text
to
.....SearchAllSubDirectories, FileTypes


Gene