Is this possible? [Resolved]

VB Code:

Select Case Extention
      Case "com"
      Case "exe"
      Case "gif" Or "jpg" 'Or "jpeg" Or "jpe" Or "psd" Or "pdd" Or "bmp" Or "pict" Or "pcx" Or "tif" Or "tiff" Or "png"
        ImageNum = 10
      Case "mp3" 'Or "wav" Or "ram" Or "ra" Or "rm" Or "au"
        ImageNum = 6
      Case "txt"
      Case "zip"
      Case Else
        ImageNum = 5
    End Select

Well I know that the code I posted won't work, but is there a similar way to do it? Or must I type every single last CASE statement?

Instead of using 'Or', just use a comma.

WOW...how did i miss that? LOL thanx man! Fewf, saves me sooo much time and typing!

You might want to use the statement

Select Case LCase$(Extention)

string comparisons are case sensitive. So if Extention happened to be Jpeg, the Case Else would be used.

Don't worry, it's already been taken care of as i assign the value to the variable. But thanx for pointing it out.