DIM $JOIN_DOMAIN
DIM $ACCT_CREATE
DIM $ACCT_DELETE
DIM $WIN9X_UPGRADE
DIM $DOMAIN_JOIN_IF_JOINED
DIM $JOIN_UNSECURE
DIM $MACHINE_PASSWORD_PASSED
DIM $DEFERRED_SPN_SET
DIM $INSTALL_INVOCATION
DIM $strDomain
DIM $strPassword
DIM $strUser
DIM $objNetwork
DIM $strComputer
DIM $objComputer
DIM $rc
$JOIN_DOMAIN = 1
$ACCT_CREATE = 2
$ACCT_DELETE = 4
$WIN9X_UPGRADE = 16
$DOMAIN_JOIN_IF_JOINED = 32
$JOIN_UNSECURE = 64
$MACHINE_PASSWORD_PASSED = 128
$DEFERRED_SPN_SET = 256
$INSTALL_INVOCATION = 262144
$strDomain = "Bandcamp.local"
$strPassword = "Flute"
$strUser = "Say my Name!"
$objNetwork = CreateObject("WScript.Network")
$strComputer = $objNetwork.ComputerName
$objComputer = GetObject("winmgmts:{impersonationLevel=Impersonate}!//$strComputer")
$rc=$objComputer.JoinDomainOrWorkGroup($strDomain,$strPassword, $strUser, '', $JOIN_DOMAIN + $ACCT_CREATE)