![]() | |
ConneXionDeleteCommercialInfo Method |
Namespace: ConneXion
Dim oConneXionCommercialInfo As New ConneXion.ConneXion Dim oCommercialInfo As New ConneXion.CommercialInfo Dim oResult As ConneXion.ConneXionResult oCommercialInfo.TAMUserName = "EXEC" oCommercialInfo.TAMPassword = "PSWD" oCommercialInfo.LicenseKey = "1234567 1" oCommercialInfo.TAMCentralAgency = "DEMOAG1" oCommercialInfo.ClientKey = "C" oCommercialInfo.ClientID = "BOXHI-1" oCommercialInfo.RecordNumber = "18" oResult = oConneXionCommercialInfo.DeleteCommercialInfo(oCommercialInfo) If oResult.Success = False Then txtCommercialInfo.Text = "DeleteCommercialInfo is false. " & oResult.Description & oResult.TAMDescription Else txtCommercialInfo.Text = "DeleteCommercialInfo is successful. " & oResult.Description & oResult.TAMDescription End If