GetLastMessage Method

Returns the last message from the server for Login or ChangePassword requests.

Syntax: object.GetLastMessage()
Owning Class: CaWHarvest
Arguments: None
Return Value: A string that represents the last message received from the server concerning Login or ChangePassword methods.

Example

Dim sobjHarvest
Set sobjHarvest = CreateObject("Chsdk.CaWHarvest")
If sobjHarvest Is Nothing Then

msgbox "Can't create Harvest.", vbOKonly + vbExclamation, "Error"
Exit Sub

End If
LngRet = sobjHarvest.Login(“CMBroker”, “CMUser”, “MyPassword")
msgbox “Login Result: “, sobjHarvest.GetLastMessage()