XCLN: Obtaining the Current User from an EFD Form

SUMMARY

The following Microsoft Visual Basic version 4.0 16-bit code fragment illustrates how to obtain the current user running an Electronic Forms Designer for Microsoft Exchange Server 4.0 application. This code fragment uses the current session object already established by the Electronic Forms Designer application. The message box arguments are merely for clarity.

   Private Sub Command1_Click()
   Dim objAddrEntry As Object

   Set objAddrEntry = mfobj.session.currentuser

   MsgBox " Name: " & objAddrEntry.Name
   MsgBox "Address: " & objAddrEntry.address
   MsgBox "Address Type: " & objAddrEntry.Type

   End Sub