共用方式為


ShellUIHelper.AddDesktopComponent 方法

將專案新增至 Microsoft Active Desktop。

語法

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

參數

sURL [in]

類型: BSTR

指定新我的最愛專案的 URL 的 String 值。

sType [in]

類型: BSTR

String值,指定要加入的專案類型。 這可以是下列其中一個值。

(映射)

元件是映射。

(網站)

元件是網站。

方 [in, 選擇性]

類型: Variant

元件左邊緣的位置,以螢幕座標表示。

頂端 [in, 選擇性]

類型: Variant

元件上邊緣的位置,以螢幕座標表示。

寬度 [in, 選擇性]

類型: 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 [僅限傳統型應用程式]
標頭
Exdisp.h
DLL
Shell32.dll (4.71 版或更新版本)