ShellUIHelper.AddDesktopComponent 方法
将项添加到 Microsoft Active Desktop。
语法
iRetVal = ShellUIHelper.AddDesktopComponent(
sURL,
sType,
[ Left ],
[ Top ],
[ Width ],
[ Height ]
)
parameters
-
sURL [in]
-
类型： BSTR
一个 String 值，该值指定新收藏项的 URL。
-
sType [in]
-
类型： BSTR
一个 String 值，该值指定要添加的项的类型。 这可以是以下值之一。
-
(映像)
-
组件是一个映像。
-
(网站)
-
组件是网站。
Left [in， optional]
类型： Variant
组件左边缘的位置（以屏幕坐标为单位）。
Top [in， optional]
类型： Variant
组件上边缘的位置（以屏幕坐标为单位）。
Width [in， optional]
类型： Variant
组件的宽度（以屏幕单位为单位）。
高度 [in， 可选]
类型： 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 专业版、Windows XP [仅限桌面应用] |
| 最低受支持的服务器 |
Windows 2000 Server [仅限桌面应用] |
| 标头 |
|
| DLL |
|