次の方法で共有

ShellUIHelper.AddDesktopComponent メソッド

  • [アーティクル]

Microsoft Active Desktop に項目を追加します。

構文

iRetVal = ShellUIHelper.AddDesktopComponent(
  sURL,
  sType,
  [ Left ],
  [ Top ],
  [ Width ],
  [ Height ]
)

パラメーター

sURL [in]

種類: BSTR

新しいお気に入りの項目の URL を指定する String 値。

sType [in]

種類: BSTR

追加する項目の種類を指定する String 値。 これには、次のいずれかの値を指定できます。

(画像)

コンポーネントはイメージです。

(Web サイト)

コンポーネントは Web サイトです。

Left [in, optional]

Type: Variant

コンポーネントの左端の位置 (画面座標)。

Top [in, optional]

Type: Variant

コンポーネントの上端の位置 (画面座標)。

Width [in, optional]

Type: Variant

コンポーネントの幅 (画面単位)。

高さ [in, 省略可能]

Type: Variant

コンポーネントの高さ (画面単位)。

例

次の例は、HTML と Visual Basic に埋め込まれた JScript に対してこのメソッドを適切に使用する方法を示しています。

Jscript：

<html>
<head>
<title></title>

<object id="ShellUIHelper"
        classid="CLSID:64AB4BB7-111E-11d1-8F79-00C04FC2FBE1"
        width=0
        height=0
        VIEWASTEXT>
</object>

<script language="JavaScript">
    function fnShellUIHelperAddDesktopComponentJ()
    {
        ShellUIHelper.AddDesktopComponent("https://www.microsoft.com/", "website");
    }
</script>

</head>
<body onload=fnShellUIHelperAddDesktopComponentJ()>
</body>
</html>

Visual Basic:

Private Sub fnShellUIHelperAddDesktopComponentVB()
    Dim objShellUIHelper As ShellUIHelper
    
    Set objShellUIHelper = New ShellUIHelper
        objShellUIHelper.AddDesktopComponent "https://www.microsoft.com/", "website"
    Set objShellUIHelper = Nothing
End Sub

必要条件

要件 値
サポートされている最小のクライアント
 Windows 2000 Professional、Windows XP [デスクトップ アプリのみ]
サポートされている最小のサーバー
 Windows 2000 Server [デスクトップ アプリのみ]
ヘッダー
Exdisp.h
[DLL]
Shell32.dll (バージョン 4.71 以降)