Поделиться через


Метод ShellUIHelper.AddDesktopComponent

Добавляет элемент в Microsoft Active Desktop.

Синтаксис

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

Параметры

sURL [in]

Тип: BSTR

Значение String , указывающее URL-адрес нового избранного элемента.

sType [in]

Тип: BSTR

Строковое значение, указывающее тип добавляемого элемента. Это может быть одно из следующих значений.

(изображение)

Компонентом является изображение.

(веб-сайт)

Компонентом является веб-сайт.

Left [in, optional]

Тип: Variant

Положение левого края компонента в координатах экрана.

Top [in, optional]

Тип: Variant

Положение верхнего края компонента в координатах экрана.

Ширина [in, необязательный]

Тип: Variant

Ширина компонента в единицах экрана.

Высота [in, необязательный]

Тип: Variant

Высота компонента в единицах экрана.

Примеры

В следующем примере показано правильное использование этого метода для JScript, внедренного в HTML и 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

Требования

Требование Значение
Минимальная версия клиента
Windows 2000 Professional, Windows XP [только классические приложения]
Минимальная версия сервера
Windows 2000 Server [только классические приложения]
Заголовок
Exdisp.h
DLL
Shell32.dll (версия 4.71 или более поздняя)