Platform SDK: Transaction Server |
GetDirectCallerName Method Example
[This product will work only on Windows NT 4.0 versions and earlier. For Windows 2000 and later, see COM+ (Component Services).]
Public Function ComponentDirectCaller() As String Dim objCtx As ObjectContext Set objCtx = GetObjectContext() ComponentDirectCaller = _ objCtx.Security.GetDirectCallerName() End Function