![]() | |
ConneXionDeleteBroker Method |
Namespace: ConneXion
Dim oBroker As New ConneXion.Broker Dim oConn As New ConneXion.ConneXion Dim oResult As ConneXion.ConneXionResult oBroker.TAMUserName = "EXEC" oBroker.TAMPassword = "PSWD" oBroker.EntityID = "GREENE1" oResult = oConn.DeleteBroker(oBroker) If oResult.Success Then MessageBox.Show("Delete Broker is successful") txtResult.Text = oResult.Description Else txtResult.Text = "Delete Broker is false" & vbCrLf & "Number: " & oResult.Number & vbCrLf & "Desc: " & oResult.Description & vbCrLf & "TAMErrorNumber: " & oResult.TAMErrorNumber & vbCrLf & "TAMErroDesc: " & oResult.TAMDescription End If