Creating a combobox list of images in Word VBA Form

[mdav2]

I am trying to create a list of image files jpg and gif from 1 directory on the HD. I have the code to return one file using FOUNDFILE. The FILENAME property can be set to "*.jpg" to find jpgs and "*.gif" to find gifs. However I cant combine the two.

Is there another way to do this?

Code:
-----
' locate the files
Set fs = Application.FileSearch
With fs
.LookIn = "C:\work"
<b>.FileName = &quot;*.jpg&quot;<\b>
If .Execute(SortBy:=msoSortByFileName, _
SortOrder:=msoSortOrderAscending) > 0 Then
MsgBox &quot;There were &quot; & .FoundFiles.Count & _
&quot; file(s) found.&quot;
For i = 1 To .FoundFiles.Count
MsgBox .FoundFiles(i)
Next i
Else
MsgBox &quot;There were no files found.&quot;
End If
End With