Hi
I write this code to find in local disk(C all files with "*.mp3"

1.Set objWord = CreateObject("Word.Application")
2.Set objDoc = objWord.Documents.Add()
3.
4.objWord.FileSearch.FileName = "*.mp3"
5.objWord.FileSearch.LookIn = "C:\"
6.objWord.FileSearch.SearchSubfolders = True
7.objWord.FileSearch.Execute
8.
9.For Each objFile in objWord.FileSearch.FoundFiles
10. Wscript.Echo objFile
11.Next
12.
13.objWord.Quit

but i have an error in line 4 that this property isn't available on this platform. anyone know why this error happened.
thaks in advance