Help with: File LISTER and LUNCHER v3

if brazen weep see this treath please look at it

from WinCustomize Forums

Hello all, i have downloaded the "File LISTER and LUNCHER v3" gadget made by brazen weep, i was going to make a player that scroll file under all device installed in my PC, so i needed this really bad [i thanks him very much if this item was not made then i had to abandon my project]

Anyway this is my question:
Is possibile to take more information from file? In example for music file take the rating, artist, etc but with NO PLAY [i mean with also player closed just file infos]. I attak an image for explain better:

 

 

I really need it :| but i can't figure out how to get these infos  :rolleyes:

Thanks for who will answer!

 

Ps: This is what i did thill now with photoshop, now i need to make this gadget my base will be that fantastic gadget made by brezen weep

4,461 views 1 replies
Reply #1 from WinCustomize Forums Top

i have find this: http://technet.microsoft.com/en-us/library/ee176615.aspx

In the link there is "objFolder.GetDetailsOf(strFileName, ID_EXTENDED_PROPERTY)", and ID_EXTENDED_PROPERT is a number between 0 [name of file]  and  34 [Product version] so for example for retriving the Title of the song [not name of file but Title of song] it says to use: objFolder.GetDetailsOf(strFileName, 10)

But I CAN'T MAKE IT WORK ..i'm getting crazy about it i post here what i have in the script hope some one will try help..

Code: vbscript
  1. Set objFile = objFSO.GetFile(sMyPath & strFN)
  2.             If err.number <> 0 Then
  3.                 Set objFile = Nothing
  4.                 blnIsBusy = False
  5.                 Exit Sub
  6.             End If
  7.         ' compile file information:
  8.         FI = objFile.Name
  9.         FI = FI & vbnewline & objFile.Type
  10.         FI = FI & vbnewline & "Size is " & SetBytes(objFile.Size)
  11.         <span style="text-decoration: underline;"><strong>FI = FI &amp; vbnewline &amp; "TITLE " &amp; <span id="ctl00_MTCS_main_ctl02">objFile.GetDetailsOf(objFile., 21)*</span></strong></span>
  12.         FI = FI &amp; vbnewline &amp; "Last accessed " &amp; objFile.DateLastAccessed
  13.         FI = FI &amp; vbnewline &amp; "Last modified " &amp; objFile.DateLastModified

 

* i've also tryed objFolder.GetDetailsOf(objFile., 21) and sMyPath.GetDetailsOf(strFN., 21) but both also don't work X| ...need some help here  :hugme: