/* Reports the path to the Internet Cookies folder, and then lists any items found in
* that folder. For Windows NT 4.0 and Windows 98, this script requires Windows Script
* Host 5.1 and Internet Explorer 4.0 or later.
*/
cookies = X2D(21)
objshell = createcomobject("Shell.Application")
objfolder = objshell~namespace(cookies)
objfolderitem = objfolder~self()
SAY objfolderitem~path
colitems = objfolder~items
DO objitem OVER colitems
SAY objitem~name
END