Método ShellUIHelper.AddDesktopComponent
Adiciona um item ao Microsoft Active Desktop.
Sintaxe
iRetVal = ShellUIHelper.AddDesktopComponent(
sURL,
sType,
[ Left ],
[ Top ],
[ Width ],
[ Height ]
)
Parâmetros
-
sURL [in]
-
Tipo: BSTR
Um valor String que especifica a URL do novo item favorito.
-
sType [in]
-
Tipo: BSTR
Um valor String que especifica o tipo de item que está sendo adicionado. Esse pode ser um dos valores a seguir.
-
(imagem)
-
O componente é uma imagem.
-
(site)
-
O componente é um site.
Esquerda [in, opcional]
Tipo: Variant
A posição da borda esquerda do componente, em coordenadas de tela.
Superior [in, opcional]
Tipo: Variant
A posição da borda superior do componente, em coordenadas de tela.
Largura [in, opcional]
Tipo: Variant
A largura do componente, em unidades de tela.
Altura [in, opcional]
Tipo: Variant
A altura do componente, em unidades de tela.
Exemplos
O exemplo a seguir mostra o uso adequado desse método para JScript inserido em HTML e Visual Basic.
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
Requisitos
| Requisito | Valor |
|---|---|
| Cliente mínimo com suporte |
Windows 2000 Professional, Windows XP [somente aplicativos da área de trabalho] |
| Servidor mínimo com suporte |
Windows 2000 Server [somente aplicativos da área de trabalho] |
| Cabeçalho |
|
| DLL |
|