I use the following script to bulk delete computers.
On Error Resume Next
AltirisNSServer = InputBox("Enter Name of Altiris Server")
Set itemManagement = CreateObject("Altiris.ASDK.NS.ItemManagement")
itemManagement.TargetServer = AltirisNSServer
itemManagement.Authenticate()
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set InputList = objFSO.OpenTextFile ("CompList.txt", 1, False)
CompCount = 0
Do until InputList.AtEndOfStream
Err.Clear
CompName = InputList.ReadLine
' WScript.Echo Compname
If CompName <> "" Then
GUIDList = itemManagement.GetItemsByNameAndType(CompName, "Computer")
If UBound(GUIDList) > -1 Then
for each GUID in GUIDList
itemManagement.DeleteItem(GUID)
' If Err.Number <> 0 Then WScript.Echo "Deleting: " & GUID
Next
End If
Err.Clear
End If
Loop
WScript.Echo "Done"
InputList.Close
Save the script as .vbs and place a file called CompList.txt in the same directory as the vbs. In the CompList you add all computers you want to delete. One computer per line. The script goes through the list and deletes the computers from the SMP. You will be prompted for the name of the SMP in the beginning of the script.