Microsoft Windows Vista Community Forums - Vistaheads
Recommended Download



Welcome to the Microsoft Windows Vista Community Forums - Vistaheads, YOUR Largest Resource for Windows Vista related information.

You are currently viewing our boards as a guest which gives you limited access to view most discussions and access our other features. By joining our free community you will have access to post topics, communicate privately with other members (PM), respond to polls, upload content and access many other special features. Registration is fast, simple and absolutely free so , join our community today!

If you have any problems with the registration process or your account login, please contact us.

Driver Scanner

Printing Music collection

microsoft.public.windows.vista.music pictures video






Speedup My PC
Reply
  #1 (permalink)  
Old 01-17-2008
Darryl
 

Posts: n/a
Printing Music collection
Hi everyone.
In Xp there was a way to do a printout of my music collection from WMP to
Excell using a third party plugin.
Is there a way to do this in Vista?
I have WVHPremium.

Reply With Quote
Sponsored Links
  #2 (permalink)  
Old 08-21-2008
 

Join Date: Aug 2008
Posts: 1
Michaelangelo08 is on a distinguished road
Thanks: 0
Thanked 0 Times in 0 Posts
Printed Music Catalog from WMP
Quote:
Originally Posted by Darryl View Post
Hi everyone.
In Xp there was a way to do a printout of my music collection from WMP to
Excell using a third party plugin.
Is there a way to do this in Vista?
I have WVHPremium.

Hello Darryl,

I am no VB expert, but I found this solution and it works fine for me using a simple VB script and Excel. I get an error message in MS Office 07, but the output is still correct:

Here’s what you do:

1. Copy the script below (select the text with your cursor and click Ctrl + C).


Set objPlayer = CreateObject("WMPlayer.OCX" )

Set objMediaCollection = objPlayer.MediaCollection
Set colSongList = objMediaCollection.getByAttribute("MediaType", "Audio")

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set objWorkbook = objExcel.Workbooks.Add()
Set objWorksheet = objWorkbook.Worksheets(1)

objWorksheet.Cells(1,1) = "Song"
objWorksheet.Cells(1,2) = "Artist"
objWorksheet.Cells(1,3) = "Album"
objWorksheet.Cells(1,4) = "Length"
objWorksheet.Cells(1,5) = "Times Played"

j = 2

For i = 0 to colSongList.Count - 1
Set objSong = colSongList.Item(i)
objWorksheet.Cells(j,1) = objSong.Name
objWorksheet.Cells(j,2) = objSong.getItemInfo("WM/AlbumArtist")
objWorksheet.Cells(j,3) = objSong.getItemInfo("Album")
objWorksheet.Cells(j,4) = objSong.durationString
objWorksheet.Cells(j,5) = objSong.getItemInfo("UserPlayCount")
j = j + 1
Next

Set objRange = objWorksheet.UsedRange
objRange.Columns.AutoFit()


2. Open Notepad and paste the code into the empty Notepad document.

3. Click ‘Save as…’ and change ‘Save as type’ from ‘Text documents’ to ‘All files’.

4. Click in the File name box and name your script with a .vbs extension. Something like music_cataloger.vbs, for example. Click Save.

5. Find the file you’ve just saved and double-click it.



And that’s it! Almost immediately, a Microsoft Office Excel spreadsheet such as the one shown above will open (click to see it bigger), with a list of your tracks which you can sort by song, artist, album, length and even the number of times played.

Neat, huh?
Reply With Quote
Reply


Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off

Similar Threads
Thread Thread Starter Forum Replies Last Post
Music Collection SiGra microsoft.public.windows.vista.music pictures video 2 01-01-2008 15:49
MTV's new music game set to rock music industry Steve General Technology News 0 11-21-2007 03:51
dowload music to computer, then bring music to powerpoint file to jake microsoft.public.windows.vista.music pictures video 0 07-10-2007 18:18
MCBase - the (Multi Media) Music Collection dataBase system 1.0 VistaDev Vista Software Development Feed 0 07-03-2007 13:09




All times are GMT +1. The time now is 10:30.




Driver Scanner - Free Scan Now

Vistaheads.com is part of the Heads Network. See also XPHeads.com , Win7Heads.com and Win8Heads.com.


Design by Vjacheslav Trushkin for phpBBStyles.com.
Powered by vBulletin® Version 3.6.7
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.
Search Engine Optimization by vBSEO 3.6.0 RC 2

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120