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 [デスクトップ アプリのみ] |
| ヘッダー |
|
| [DLL] |
|