Mp3 search

searches a location for mp3 files and then displays them in a word document

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Add()
Set objSelection = objWord.Selection
objWord.Visible = True

objSelection.TypeText "MP3 lister"
objSelection.TypeParagraph()
objSelection.TypeText "" & Now
objSelection.TypeParagraph()
objSelection.TypeParagraph()

objWord.FileSearch.FileName = "*.mp3"
objWord.FileSearch.LookIn = "D:\"
objWord.FileSearch.SearchSubfolders = True
objWord.FileSearch.Execute

For Each objFile in objWord.FileSearch.FoundFiles
objSelection.TypeText objFile
objSelection.TypeParagraph()
Next

Related posts:

1. create a word report on the services create a word report on the services on your PC...
2. english to french dictionary #include #include char dict[][2][40] = { “hello”,”bonjour” , “year”,”annee” ,...
3. Log users IP address This ASP example will retrieve a visitors IP address and...
4. File properties using ASP.net The following example will display various properties of a given...
5. ASP.net file properties example This ASP.net example shows various file properties <%@Page Language=”VB” %>...

Related posts brought to you by Yet Another Related Posts Plugin.