Chaps,
I changed the script to use InGroup and all works fine with a security group.
Thanks for the help.
I've looked at the UDF from your forum, looks far more complicated then just using the InGroup statement. what would be the advantage to using this instead?.
How would I use this to autocreate say PrinterA to AD security group ADPrint1

Function fnInGroupAD(ADPrint1)
Dim $objSys,$objTarget,$aMemberOf,$sMemberOf
$objSys = CreateObject("ADSystemInfo")
$objTarget = GetObject("LDAP://"+Iif($bComputer,$objSys.ComputerName,$objSys.UserName))
$aMemberOf = $objTarget.GetEx("memberOf")
For Each $sMemberOf in $aMemberOf
If InStr($sMemberOf,"CN="+$sGroup+",")
$fnInGroupAD = Not 0
Exit
EndIf
Next
$fnInGroupAD = NOT 1
AddPrinterConnection ("\\servername\PrinterA") = 0
EndFunction