Sub dataGridDblClick(Sender)
if DataGrid.GetCurrentField("CONTACTID") = "" then Exit sub on error resume next
Application.MainViews.AddEx "System:Contact Details", 1, True, True, DataGrid.GetCurrentField("CONTACTID"), "" ErrorCheck("") On Error GoTo 0 Application.BasicFunctions.RefreshMainView
End Sub
Hope it helps |