ConneXionUpdateNote Method

public ConneXionResult UpdateNote(
	Note Note
)

Public Function UpdateNote ( 
	Note As Note
) As ConneXionResult

Dim oConneXion As New ConneXion.ConneXion
Dim oNote As New ConneXion.Note
Dim oResult As ConneXion.ConneXionResult

oNote.TAMUserName = "EXEC"
oNote.TAMPassword = "PSWD"
oNote.RecordNumber = "12"
oNote.EntityID = "BOOKR-1"
oNote.EntityType = "C"

oResult = oConneXion.FindNote(oNote)

If oResult.Success Then

    oNote.TAMUserName = "EXEC"
    oNote.TAMPassword = "PSWD"
    oNote.NoteDescription = oNote.NoteDescription & "Her birthday is Jan 17th"

    oResult = oConneXion.UpdateNote(oNote)

    If oResult.Success Then
        MessageBox.Show("Update Note is Successful")
    Else
        txtResult.Text = "Number: " & oResult.Number & vbCrLf & "Desc: " & oResult.Description & vbCrLf &
            "TAMErrorNumber: " & oResult.TAMErrorNumber & vbCrLf & "TAMErroDesc: " & oResult.TAMDescription
    End If
Else
    MessageBox.Show("Find Note is False")

End If