However if you want quick and dirty and you don't mind if the age calculation is out by a couple of days then this will do you:

Code:
Break ON
$sDir="C:\TEMP"
 
$sFile=Dir($sDir)
While NOT @ERROR AND $sFile<>""
	$sFile=$sDir+"\"+$sFile
	If Not (16 & GetFileAttr($sFile))
		$aiFileDate=Split(Split(GetFileTime($sFile))[0],"/")
		$aiToday=Split(@DATE,"/")
		If $aiFileDate[0]
			$iFileAge=(Cint($aiToday[0])-$aiFileDate[0])*365
				+(CInt($aiToday[1])-$aiFileDate[1])*30
				+(Cint($aiToday[2])-$aiFileDate[2])
			$sFile+" is at about "+$iFileAge+" days old."+@CRLF
			; ** DELETE YOUR FILES HERE **
		EndIf
	EndIf
	$sFile=Dir()
Loop


If you only delete files whose age is at least 33 days it should be sufficient for you.