VBScriptからIMsRdpClient5 :: GetErrorDescriptionメソッドを呼び出す方法

Question

WebページのRDP ActiveXコントロールを使用して、リモートデスクトップ接続を開きます。ここで私が使用してコードがあるが、それは動作しませんGetErrorDescriptionメソッドを呼び出すときに、それが立ち往生：

<script language="vbscript"> 

    sub MsRdpClient_OnDisconnected(disconnectCode) 

     dim error_message 

     extendedDiscReason = MsRdpClient.ExtendedDisconnectReason 

     MsRdpClient.GetErrorDescription disconnectCode, extendedDiscReason, error_message 

     MsgBox error_message, 0, "Error" 

    end sub 

</script> 

おかげで、 ラファエル

Answer 1

を私はTechNetフォーラムで答えを見つけました。

<script language="vbscript"> 

    sub MsRdpClient_OnDisconnected(disconnectCode) 

     dim error_message 

     extendedDiscReason = MsRdpClient.ExtendedDisconnectReason 

     error_message = MsRdpClient.GetErrorDescription(disconnectCode, extendedDiscReason) 

     MsgBox error_message, 0, "Error" 

    end sub 

</script> 

は今、私はjavascriptの代わりにVBScriptでMsRdpClientイベントハンドラを作成する方法を知っておく必要があります。

Answer 2

私はあなたがこの[1]の制限を打っていると思うが。 VBScriptはVariantsのみで動作するため、より特定の型のパラメータを受け入れることはできません。

RDP ActiveXコントロールを変更することはできないため、C++ラッパーの作成以外にほとんどできません。しかし、それは他の頭痛の種が付属しています...

[1] http://support.microsoft.com/kb/197957