retsek";p="65477 (!empty($user->lang['WROTE'])) ? $user->lang['WROTE'] : ucwords(strtolower(str_replace('_', ' ', 'WROTE'))):
VBscript does NOT, unfortunately, have those features built in. You will need to use Win32 API or code the feature in another language then access the DLL.
Drove me nuts for couple weeks trying to find a way to do it in vbs and finally found info saying not possible. Hehe Good luck and keep up good work on your script.
Thanks retsek, wrote a class to handle it. I appreciate the info, saved me a lot of searching.