Hi Cetin

>

>loWMI = GetObject("winmgmts:\\.\root\cimv2")
>oItems = loWMI.ExecQuery("select * from Win32_PhysicalMedia")
>
>For each oItem in oItems
> ? oItem.Tag, oItem.SerialNumber
>endfor
>

Sorry about dropping in like this, but wow, what is this? Is this win2K+ only?

Congratulations for being awarded personality this year too and of course wishing you the same next year.