![]() | |
ConneXionUpdateLienholder Method |
Namespace: ConneXion
Dim oConneXion As New ConneXion.ConneXion Dim oResult As New ConneXion.ConneXionResult Dim oLienholder As New ConneXion.Lienholder oLienholder.TAMUserName = "EXEC" oLienholder.TAMPassword = "PSWD" oLienholder.EntityID = "ARCMAT1" oResult = oConneXion.FindLienholder(oLienholder) If oResult.Success = False Then txtLienholder.Text = "FindLienholder is false. " & oResult.Description & oResult.TAMDescription Else oLienholder.TAMUserName = "EXEC" oLienholder.TAMPassword = "PSWD" oLienholder.EntityID = "ARCMAT1" oLienholder.Email = "cdavis@arccorp.com" oResult = oConneXion.UpdateLienholder(oLienholder) If oResult.Success = False Then txtLienholder.Text = "UpdateLienholder is false. " & oResult.Description & oResult.TAMDescription Else txtLienholder.Text = "UpdateLienholder is successful. " & oResult.Description & oResult.TAMDescription End If End If