At long last, I've finally done it.
I have managed to set permissions on a folder without inheritance and the sorting order being screwed up. But before I submit a fullfledged UDF I'd like to ask you all to try this UDF on your networks/home environments and see how it works out with inheritance and sorting order.

XP is needed or Activeds.dll at least (comes standard in XP).

Things to test:
1. Add a new user (in the form of @LDOMAIN\@USERID or @WKSTA\@USERID) to a folder.
2. open the security TAB on the folder and see if it worked.
3. create a subfolder and check the security tab there.

If all 3 work without errors, or with errors I'd like to know about it.
Without any further ado here's the preliminary UDF:
 Code:
Function NTFSPerms($cmd,$object,Optional $trustee,Optional $perms)
  Dim $adsu, $sd, $dacl, $ace, $newace
  $adsu = CreateObject("ADsSecurityUtility")
  If @error Exit @error EndIf
  $sd = $adsu.GetSecurityDescriptor($object,1, 1)
  $dacl = $sd.DiscretionaryAcl
  Select
    Case $cmd = "Owner"
      ? $sd.Owner
    Case $cmd = "Count"
      ? $dacl.AceCount
    Case $cmd = "Show"
      For Each $Ace in $dacl
        ? $Ace.Trustee
        ? $Ace.AceFlags
        ? $Ace.AccessMask
        ? $Ace.AceType
        ? $Ace.Flags
        ?
      Next
    Case $cmd = "DEL"
      If $trustee <> ""
        For Each $ace In $Dacl
          If $ace.trustee = $trustee
            $Dacl.RemoveAce($Ace)
          EndIf
        Next
        $sd.DiscretionaryAcl = $Dacl
        $adsu.SetSecurityDescriptor($object,1,$sd,1)
      Else
        Exit 1
      EndIf
    Case $cmd = "ADD"
      If $trustee <> ""
        $NewAce = CreateObject("AccessControlEntry")
        $NewAce.Trustee = $trustee
        $NewAce.AceFlags = 3
        $NewAce.AccessMask = -1 ;2032127
        $NewAce.AceType = 0
        $dacl.AddAce($NewAce)
        $sd.DiscretionaryAcl = $Dacl
        $adsu.SetSecurityDescriptor($object,1,$sd,1)
        ? @serror
      Else
        Exit 1
      EndIf
    Case 1
      Exit 1
  EndSelect
EndFunction


Usage:
NTFSPerms("ADD","C:\testfolder","DOMAIN\user")
NTFSPerms("DEL","C:\testfolder","DOMAIN\user")
NTFSPerms("OWNER","D:\testfolder")
NTFSPerms("SHOW","D:\testfolder")
NTFSPerms("COUNT","D:\testfolder")