WSUS の API お勉強中

まず、API を使用するには、%ProgramFiles%\Update Services\Service\Bin\microsoft.updateservices.administration.dll が必要。
コードを開発するには、まずこれを「メニュー」の「プロジェクト＞参照の追加」から読み込ませる必要があります。

コードにはこんなおまじないが必要。

Dim AdminProxy As AdminProxy
Dim iUpdateServer As IUpdateServer

AdminProxy = New AdminProxy
iUpdateServer = AdminProxy.GetUpdateServer

iUpdateServer に現在使用している WSUS サーバーを指定します。
WSUS サーバーは AdminProxy.GetUpdateServer から取得することができるようなので、このような記述が必要、というわけです。