Find specific file exist in a folder

[shijukonline]

Hi,

How I can write a descriptive program to check whether any .mp4 file exist in a particular folder starting with a specific name like 'clip' (eg. clip0019.mp4)

the below code shows clip0019.mp4 exists if the file is in c folder. I want to check any file starting with clip in .mp4 format exist in c: folder

Code:

filespec = "C:\clip0019.mp4"
Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(filespec)) Then
msg = filespec & " exists."
Else
msg = filespec & " doesn't exist."
End If
MsgBox (msg)

Please help me for this

Thanks in advance.