Is there a quick and easy way to determine if a file is an image?

Howdy, all,

I received images in the course of a normal day.  However, the files do not have normal extensions (".aaa", ".aab", ".aac", etc instead of ".gif", ".jpg", ".tif", etc) and are intermixed with non-image files in an archive.  

I'm writing an app that will extract and display the images, but I want to weed out the non-image files from the directory list.

Does vb.net have a quick and easy way to determine if a file is a displayable image or not?

Thanks in advance.
bdzotAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Mike TomlinsonMiddle School Assistant TeacherCommented:
You could do something like this:

    Private Function isValidImage(ByVal imageFileName As String) As Boolean
        If System.IO.File.Exists(imageFileName) Then
            Dim valid As Boolean
            Dim bmp As Bitmap
            Try
                bmp = Image.FromFile(imageFileName)
                valid = True
            Catch ex As Exception
                valid = False
            Finally
                If Not (bmp Is Nothing) Then
                    bmp.Dispose()
                End If
            End Try
            Return valid
        Else
            Return False
        End If
    End Function
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
bdzotAuthor Commented:
Thanks, Idle.

Unfortunately, .bmp is one of the formats I don't deal with.

However, this worked:

Private Function isValid(ByVal imagePath as string) as Boolean
    Dim valid as Boolean
    Dim imageFile as Image

    Try
        imageFile = Image.FromFile(imagePath)
        valid = True
    Catch ex As Exception
        valid = false
    Finally
        imageFile = Nothing    
    End Try

    Return valid

End Function

Much thanks!
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic.NET

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.