次の方法で共有


IADsServiceOperations::SetPassword メソッド (iads.h)

IADsServiceOperations::SetPassword メソッドは、サービス マネージャーによって使用されるアカウントのパスワードを設定します。 このメソッドは、このサービスのセキュリティ コンテキストが作成されるときに呼び出されます。

構文

HRESULT SetPassword(
  [in] BSTR bstrNewPassword
);

パラメーター

[in] bstrNewPassword

新しいパスワードとして格納される null で終わる Unicode 文字列。

戻り値

このメソッドは、S_OKを含む標準の戻り値をサポートしています。 その他の戻り値の詳細については、「 ADSI エラー コード」を参照してください。

注釈

プロパティ IADsService::get_ServiceAccountName は、このパスワードを設定するアカウントを識別します。

次のコード例は、Windows 2000 で実行されている Microsoft FAX サービスのパスワードを設定する方法を示しています。

Dim cp As IADsComputer
Dim so As IADsServiceOperations
Dim s As IADsService
Dim sPass As String

On Error GoTo Cleanup

Set cp = GetObject("WinNT://myMachine,computer")
Set so = cp.GetObject("Service", "Fax")
' Insert code to securely retrieve a new password from the user.
so.SetPassword sPass
 
Set s = so
MsgBox "The password for " & so.name & " has been changed on "_
        & s.ServiceAccountName

Cleanup:
    If (Err.Number<>0) Then
        MsgBox("An error has occurred. " & Err.Number)
    End If
    Set cp = Nothing
    Set so = Nothing
    Set s = Nothing

次のコード例は、Windows 2000 で実行されている Microsoft FAX サービスのパスワードを設定する方法を示しています。

HRESULT SetServicePassword(LPCWSTR pwszADsPath, LPCWSTR, pwszPasword)
{
    IADsContainer *pCont = NULL;
    IADsServiceOperations *pSrvOp = NULL;
    IDispatch *pDisp = NULL;
    HRESULT hr = S_OK;

    hr = ADsGetObject(pwszADsPath, IID_IADsContainer, (void**)&pCont);
    if(FAILED(hr)) 
    {
        goto Cleanup;
    }

    hr = pCont->GetObject(CComBSTR("Service"), CComBSTR("Fax"), &pDisp);
    if(FAILED(hr)) 
    {
        goto Cleanup;
    }

    hr = pDisp->QueryInterface(IID_IADsServiceOperations, (void**)&pSrvOp);
    if(FAILED(hr)) 
    {
        goto Cleanup;
    }

    // Insert code to securely retrieve the password from the user.
    hr = pSrvOp->SetPassword(CComBSTR(pwszPassword));

Cleanup:
    if(pDisp) 
    {
        pDisp->Release();
    }
    if(pCont) 
    {
        pCont->Release();
    }
    if(pSrvOp) 
    {
        pSrvOp->Release();
    }
}

要件

要件
サポートされている最小のクライアント Windows Vista
サポートされている最小のサーバー Windows Server 2008
対象プラットフォーム Windows
ヘッダー iads.h
[DLL] Activeds.dll

こちらもご覧ください

IADsService

IADsService::get_ServiceAccountName

IADsServiceOperations