this code:
code:
break on
$filedir="\\server\drives$$\Listening\Singles"
$fso = createobject("Scripting.FileSystemObject")
$cd = $fso.getfolder("$filedir")
$folder= $cd.Files
$shell = createobject("shell.application")
$foldir = $shell.namespace("$filedir").items
for each $file in $folder
; ? $file.name+" "+ $file.type
$fparse = $foldir.item($file.name)
? $fparse.extendedproperty("Name")+"-"
$fparse.extendedproperty("Title")+"-"
$fparse.extendedproperty("Artist")+"-"
$fparse.extendedproperty("Album")+"-"
next
$shell.quit
$fso.quit
yields:
quote:
93_50_4_.mp3--4 Non-blondes-Bigger, Better, Faster, More!-
96_02_To.mp3--Tony Rich--
96_03_Do.mp3--Donna Lewis--
96_04_Al.mp3--Alanis Morissette-Jagged Little Pill-
96_10_Fu.mp3--Fugees--
96_17_Gi.mp3--Gin Blossoms--
96_18_La.mp3--La Bouche--
96_35_Qu.mp3--Quad City Djs--
96_36_Al.mp3--Alanis Morissette-Jagged Little Pill-
96_37_Me.mp3--Merril Bainbridge--
96_38_Ho.mp3--Hootie and the Blowfish--
96_39_Ke.mp3--Keith Sweat--
96_40_Oa.mp3--Oasis--
96_53_Al.mp3--Alanis Morissette-Jagged Little Pill-
96_67_Bl.mp3--Blues Traveler--
[ 29 May 2002, 04:10: Message edited by: Radimus ]
