Delete "variable folders"

When I shutdown the computer, I want to run a script (by the policy) that deletes all the folders with the next name in it:
C:\Documents and Settings\*.Domeinnaan.*
The first * can be any name, the second * can be 000, 001, 002, 003 etc.
I found a script that deletes a folder by the name that you give:

dim filesys, demofolder
set filesys = CreateObject ("Scripting.FileSystemObject")
set demofolder = filesys.GetFolder("C:\temp")
demofolder.Delete

But now, I want to throw away all the folders that I named before

Thread moved from the FAQ forum, which is not the place to post your questions.