Skip to content

Instantly share code, notes, and snippets.

@gsherman

gsherman/717.cbs

Created March 15, 2012 20:08
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save gsherman/2046559 to your computer and use it in GitHub Desktop.
Save gsherman/2046559 to your computer and use it in GitHub Desktop.
Download ZIP
ClearBasic code for form 717 to prevent Clarify Client crash
Raw
717.cbs
' More Info: http://crm.ittoolbox.com/groups/technical-functional/clarify-l/clarify-131-baseline-crash-when-using-log-note-4567173
Sub Form_Load()
Me.Dodefault
End Sub
Public Sub Message(ByVal num As Long, ByVal info As String)
'MsgBox "form " & Cstr(Me.Id) & " received message " & cstr(num) & " with info of: " & info
Select Case num
Case 554
'Do Nothing
Case Else
Me.Dodefault
End Select
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment