.net - vbs スクリプトを使用して既存の COM+ アプリケーション ID を変更する

Question

vbs スクリプトを使用して既存の COM+ アプリケーション ID を変更する方法。認証レベル = なしのように、vb スクリプトを介してこのユーザーに識別します。com+ アプリケーションの追加/削除に関する多くの投稿が見つかりましたが、既存のものは変更されていません。助けてください

Answer 1

すべてのアプリケーションを取得し、目的の名前のアプリケーションを見つけて、ID、パスワード、および認証を Connect に設定するスクリプトを次に示します。アプリケーション プロパティの完全な一覧については、COM+ Administration CollectionsのApplications Collectionを参照してください。

Const COMAdminAuthenticationDefault   = 0
Const COMAdminAuthenticationNone      = 1
Const COMAdminAuthenticationConnect   = 2
Const COMAdminAuthenticationCall      = 3
Const COMAdminAuthenticationPacket    = 4 
Const COMAdminAuthenticationIntegrity = 5
Const COMAdminAuthenticationPrivacy   = 6

Dim catalog
Dim applications
Dim application

Set catalog = CreateObject("COMAdmin.COMAdminCatalog")
Set applications = catalog.GetCollection("Applications")

Call applications.Populate

For Each application In applications

    If (application.value("Name")  = "AppName") Then

        application.Value("Authentication") = COMAdminAuthenticationConnect
        application.Value("Identity") = "domain\account"
        application.Value("Password") = "Password"

        Call applications.SaveChanges
    End If
Next