Haha thx mart \:\)

Here is code that uses ADSI to create a comp account.
Just coded and tested.
 Code:
Dim $compname, $ldap, $comp
$compname = "TestPC2" ; can also use @WKSTA
$ldap = GetObject("LDAP://OU=SomeSubOU,OU=SomeOU,DC=SomeDomain,DC=SomeDomainExtention")
$comp = $ldap.Create("Computer","CN=" + $compname)
$comp.Put("samAccountName", $compname + "$")
$comp.Put("userAccountControl", 4096)
$comp.SetInfo