Examples: IsEmbeddedInsideWCT property

Clicking on this button will display a messagebox indicating where the application is running.

Sub Click(Source As Button)
Dim uiws As New NotesUIWorkspace
If (uiws.IsEmbeddedInsideWCT) Then
	Msgbox "I'm running in the Workplace Client"
Else
	Msgbox "I'm running in the stand-alone Notes Client"
End If
End Sub