ホーム › Networking.ActiveDirectory › IADsSession
IADsSession
COMIDispatch (デュアル)✅ IDispatch を実装(デュアルインターフェース)。HSP では
comobj 経由でメソッド名による遅延バインド呼び出しができます(vtableインデックス不要)。公式ドキュメント
IADsSession インターフェイスは、IADs を継承するデュアルインターフェイスです。ネットワーク越しのファイルサービスにおけるアクティブなセッションを表すために設計されています。
解説(Remarks)
リモートユーザーが対象のコンピューター上のリソースを開くと、そのリモートユーザーとコンピューターの間にアクティブなセッションが確立されます。1 つのアクティブなセッションでは、多数のリソースを開くことができます。ADSI は、このプロセスを、このインターフェイスを実装するセッションオブジェクトで表現します。
このインターフェイスのメソッドを呼び出すことで、セッション固有のデータ(たとえば、セッションを使用しているユーザー、使用されているコンピューター、現在のセッションの経過時間など)を調べることができます。
セッションはファイルサービスによって管理されます。セッションオブジェクトを取得するには、まずこのサービス("LanmanServer" または "FPNW")にバインドします。
例
次のコード例は、セッションへのバインド方法を示しています。
Dim fso as IADsFileServiceOperations
Dim ss as IADsCollection
On Error GoTo Cleanup
Set fso = GetObject("WinNT://myComputer/LanmanServer")
Set ss = fso.Sessions
' セッションデータにアクセスするコードをここに挿入します。
Cleanup:
If (Err.Number<>0) Then
MsgBox("An error has occurred. " & Err.Number)
End If
Set fso = Nothing
Set ss = Nothing
メソッド 6
vtbl = vtable インデックス(0始まり)。IDispatch 実装のため HSP ではメソッド名でも呼べます(上記)。低レベルの index 呼び出し用に vtbl も掲載。0〜2 は IUnknown。
| retval | LPWSTR* | out | このセッションのユーザー名を受け取る出力先。BSTRで返る(読取専用)。 |
| retval | LPWSTR* | out | セッションユーザーのADsパスを受け取る出力先。BSTRで返る(読取専用)。 |
| retval | LPWSTR* | out | 接続元コンピューター名を受け取る出力先。BSTRで返る(読取専用)。 |
| retval | LPWSTR* | out | 接続元コンピューターのADsパスを受け取る出力先。BSTRで返る(読取専用)。 |
| retval | INT* | out | セッションの接続継続時間(秒単位)を受け取る出力先。INT*で返る(読取専用)。 |
| retval | INT* | out | セッションのアイドル時間(秒単位)を受け取る出力先。INT*で返る(読取専用)。 |
出典・ライセンス: 上記「公式ドキュメント」の内容は Microsoft の Win32 API ドキュメント(MicrosoftDocs/sdk-api)を日本語に翻訳・改変したものです。© Microsoft Corporation. CC BY 4.0 で提供。
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)
HSP用 COM定義
#usecom / #comfunc によるHSPのCOM呼び出し定義。数字は vtbl インデックス(0始まり)。クラスIDが無い場合 #usecom の末尾は "{}"、ある場合は "{CLSID}"。
出力引数:
#define global IID_IADsSession "{398B7DA0-4AAB-11CF-AE2C-00AA006EBFB9}" #usecom global IADsSession IID_IADsSession "{}" #comfunc global IADsSession_get_User 20 var #comfunc global IADsSession_get_UserPath 21 var #comfunc global IADsSession_get_Computer 22 var #comfunc global IADsSession_get_ComputerPath 23 var #comfunc global IADsSession_get_ConnectTime 24 var #comfunc global IADsSession_get_IdleTime 25 var ; ※数字は vtbl インデックス(0始まり)。0/1/2 は IUnknown(QueryInterface/AddRef/Release)。 ; ※このインターフェースは直接 CoCreateInstance するクラスIDが無いため "{}"(他メソッド/アクティベーションで取得)。 ; ※出力/バッファ引数は var(変数直渡し)。varptr 方式にも切替可。 ; ※IDispatch 実装。HSP では comobj 経由でメソッド名による呼び出しも可能(vtbl 不要)。#define global IID_IADsSession "{398B7DA0-4AAB-11CF-AE2C-00AA006EBFB9}" #usecom global IADsSession IID_IADsSession "{}" #comfunc global IADsSession_get_User 20 sptr #comfunc global IADsSession_get_UserPath 21 sptr #comfunc global IADsSession_get_Computer 22 sptr #comfunc global IADsSession_get_ComputerPath 23 sptr #comfunc global IADsSession_get_ConnectTime 24 sptr #comfunc global IADsSession_get_IdleTime 25 sptr ; ※数字は vtbl インデックス(0始まり)。0/1/2 は IUnknown(QueryInterface/AddRef/Release)。 ; ※このインターフェースは直接 CoCreateInstance するクラスIDが無いため "{}"(他メソッド/アクティベーションで取得)。 ; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。 ; ※IDispatch 実装。HSP では comobj 経由でメソッド名による呼び出しも可能(vtbl 不要)。