Gaaah! DEL *.* \:o

You must be the luckiest man alive, go buy a lottery ticket now!

Quite how you got away with not seriously damaging the local machine I don't know.

I left the DEL out so that there was no risk to your system in case my coding had unexpected results. The full code (including the delete) would be:
 Code:
$sPrefix="Q:\Documents and Settings\"
$sSuffix="\documentum\viewed"

$sEntry=Dir($sPrefix+"*")
While Not @ERROR
	If Exist($sPrefix+$sEntry+$sSuffix)
		"Match found for user "+$sEntry+@CRLF
		; Here comes the delete, commented out.
		; Remove the ";" character from the line below to enable the delete code.
		;Del $sPrefix+$sEntry+$sSuffix+"/*.*"
	EndIf
	$sEntry=Dir()
Loop


Run the script as-is to check that the script correctly identifies direcorties to clean up.

When you are happy with that uncomment the Del line by removing the ";" character.