I know Witto, I was referring to NTDOC's statement about "Roaming profiles are bad for you"
Anyway, it is simple, enumerate all users in AD compare the users to the folders using simple Dir() and if the user does not exists remove dir.

An example code to list the users:
Code:

Function ListADUsers
  Dim $User, $Users
  $Users = GetObject("WinNT://@ldomain")
  $Users.filter = "User",""
  For Each $User In $Users
    ? $User.Name
  Next
EndFunction

Edited by apronk (2006-10-05 11:05 AM)