一、如何在ie右鍵菜單中添加菜單項
    如果使用過netants的朋友可能都知道，netants在ie中添加了右鍵菜單功能，只要在頁面的一個鏈接
或者圖片上點擊右鍵后在菜單中選擇 down by netants 就可以調用netants下載該鏈接指向的文件。在本
文中作者將介紹如何通過vb來實現這樣的功能。
    要實現在ie右鍵菜單中添加菜單項的功能，要依次實現以下步驟：
    1、在注冊表hkey_current_user/software/microsoft/internet explorer/menuext項下建立一個
新項，項的名稱既出現在菜單中的標題，例如你想建立的菜單項標題為add url，則新建項的名稱為
hkey_current_user/software/microsoft/internet explorer/menuext/add url
    2、將新建項的默認值設定為一個url地址，當用戶點擊菜單項后，ie就會調用url指向的頁面中的腳
本，在目標頁面的腳本中通過訪問ie提供的external對象的menuarguments屬性就可以訪問ie中的頁面中的
各種對象，例如鏈接、圖片、表單域、被選中的文本等。詳細的幫助請參考msdn中關于internetexplore object
的幫助，熟悉了window對象才可以比較好的了解下面的腳本。
    對于如何實現自身的程序訪問menuarguments的問題，我們可以仿效netants的做法，首先建立一個
ole automation對象，然后在腳本中調用該對象，并將頁面信息傳遞對象處理。下面我們需要首先通過vb建立
一個對象：
    打開vb，點擊菜單： file | new ，在新建工程窗口中選擇 activex dll 后按確定鍵建立一個activex dll
工程。然后在工程列表窗口中將class1的name屬性更改為netapi，然后在netapi的代碼窗口中添加如下代碼：
public sub addurl(url as string, info as string)
    msgbox info, vbokonly, url
end sub
    保存文件，將工程文件保存成netsamp.vbp。然后在菜單中選擇 file | make netsamp.dll建立對象動態
連接庫。
    接下來是注冊庫，在windows目錄下找到regsvr32.exe，然后將其拷貝到netsamp.dll所在目錄下，將
netsamp.dll的的圖標拖到regsvr32.exe上放開，這時regsvr32.exe就會彈出對話框提示對象注冊成功。
    打開ultraedit(或者其它文本編輯器)將下面的腳本代碼輸入編輯器中：
<script language="vbscript">

sub oncontextmenu()
 on error resume next
 set srcevent = external.menuarguments.event
 set eventelement = external.menuarguments.document.elementfrompoint(srcevent.clientx, srcevent.clienty)
 set objnetsamp=createobject("netsamp.netapi")
       
        if srcevent.type = "menuextanchor" then
  set srcanchor = eventelement
  do until typename(srcanchor)="htmlanchorelement"
   set srcanchor=srcanchor.parentelement
  loop
  call objnetsamp.addurl(srcanchor.href,srcanchor.innertext)
 elseif srcevent.type="menuextimage" then
  if typename(eventelement)="htmlareaelement" then
   call objnetsamp.addurl(eventelement.href,eventelement.alt)
  else
   set srcimage = eventelement
   set srcanchor = srcimage.parentelement
   do until typename(srcanchor)="htmlanchorelement"
    set srcanchor=srcanchor.parentelement
    if typename(srcanchor)="nothing" then
     call objnetsamp.addurl(srcimage.href,srcimage.alt)
     exit sub
    end if
   loop
   call objnetsamp.addurl(srcanchor.href, srcimage.alt)
  end if
 elseif srcevent.type="menuextunknown" then
  set srcanchor = eventelement
  do until typename(srcanchor)="htmlanchorelement"
   set srcanchor=srcanchor.parentelement
   if typename(srcanchor)="nothing" then
    call objnetsamp.addurl(eventelement.href,eventelement.innertext)
    exit sub
   end if
  loop
  call objnetsamp.addurl(srcanchor.href,srcanchor.innertext)
 end if
end sub
 
call oncontextmenu()

</script>
   
    將文件保存到c:/program files 下，文件名為 geturl.htm
    從上面的腳本可以看到，首先訪問external.menuarguments屬性，獲得用戶單擊鼠標右鍵位置的對象，然
后根據對象的不同獲得它的url，然后建立iecontextmenu.iemenu1對象并調用該對象的addurl方法。
    接下來是為右鍵菜單建立注冊項，打開ultraedit(或者其它文本編輯器)將下面的注冊數據輸入編輯器中
windows registry editor version 5.00

[hkey_current_user/software/microsoft/internet explorer/menuext/&get url]
@="c://program files//geturl.htm"
"contexts"=dword:00000022

    將文件以reg為后綴保存，然后在windows資源管理器中雙擊該文件將注冊項添加到注冊表中，然后打開
ie，右鍵點擊一個連接或者圖片，在彈出菜單中會出現一個get url項，點擊該項，就會出現一個消息框顯示
點擊的連接或者圖片的url地址
    下面再介紹一下上面注冊項中contexts項的作用，通過該項可以制定菜單項在右鍵點擊ie中的什么對象時
出現，它可以為以下值的“或”組合：
 對象  值
 缺省   0x1
 圖片   0x2
 控件   0x4
 表單域   0x8
 選擇文本  0x10
 錨點   0x20
    例如上面我們希望菜單項在用戶點擊圖片或者超鏈接時出現，那么我們就將值設置為dword:00000022，既在
點擊圖片 或者 錨點時出現菜單。一個錨點是頁面中描述一個超鏈接的對象。如果不設置contexts項，則菜單項
會在點擊任何對象時出現在右鍵菜單中。
    通過上面的程序介紹我們可以看到ie鼠標右鍵菜單的工作過程。前面講了，netants就是使用這樣的方法通過
在腳本中建立對象來實現調用netants的，那么我們如果安裝了netants，就可以在程序中通過調用netants對象來
調用netants。
    建立一個新工程，點擊菜單 projects | references 項，選擇其中的 antapi 1.0 type library 項，如果沒有
點擊browser按鈕，在文件列表框中選擇網絡螞蟻目錄下的netapi.dll后按打開鍵。在form1中添加一個commandbutton
按鈕，在command1_click事件中添加如下代碼：
    dim ant as new antapilib.antapiobj
   
    ant.addurl "http://www.knowsky.com/z.zip", "", "http://www.knowsky.com/"
    點擊command1，然后netants就會運行并且將http://www.knowsky.com/z.zip添加到任務中。

二、如何添加任務欄按鈕
    基本上來說，添加任務欄按鈕只需要修改注冊表就可以實現。通過修改注冊表來實現添加按鈕的步驟如下：

1、建立一個guid。
2、打開注冊表編輯器，轉到hkey_local_machine/software/microsoft/internet explorer/extensions部分，
在其下添加一個新的項，名稱為 <your guid> ，your guid為你剛建立的guid。
3、在注冊表的 hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>
下建立一個新的string類型的值，名稱為hoticon，該值定義當按鈕具有熱點時的圖標，它的一般類型為：
包含圖標的文件全路徑名,圖標索引，例如：
c:/progra~1/kingsoft/xdict/ieplugin.dll,208
4、在注冊表的 hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>
下建立一個新的string類型的值，名稱為icon，該值定義當按鈕的圖標，它的一般類型為：
圖標文件全路徑名,圖標索引
5、在注冊表的 hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>
下建立一個新的string類型的值，名稱為buttontext，該值定義按鈕的tooltip文本。
6、在注冊表的 hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>
下建立一個新的string類型的值，名稱為default visible，該值定義按鈕是否可見，如果是，則該值設定
為"yes"，否則設定為"no"。
7、在注冊表的 hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>
下建立一個新的string類型的值，名稱為clsid，將該值設定為{1fba04ee-3024-11d2-8f1f-0000f87abd16}
8、在注冊表的 hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>
下建立一個新的string類型的值，名稱為exec，該值定義點擊按鈕后運行的文件的全路徑名稱，例如:
c:/program files/samples/net.exe

例如netants的按鈕注冊表項的內容就是象下面這樣：

windows registry editor version 5.00

[hkey_local_machine/software/microsoft/internet explorer/extensions/{57e91b47-f40a-11d1-b792-444553540000}]
"clsid"="{1fba04ee-3024-11d2-8f1f-0000f87abd16}"
"default visible"="yes"
"hoticon"="c://progra~1//netants//netants.exe,1001"
"icon"="c://progra~1//netants//netants.exe,1000"
"exec"="c://progra~1//netants//netants.exe"
"buttontext"="netants"
"menutext"="&netants"
"menustatusbar"="launch netants"

    當點擊netants按鈕時就會運行netants。上面的注冊表項中下面的兩項：menutext項添加一個菜單項到菜單
的“工具”欄中，menustatusbar項定義當光標移動到添加的菜單欄上后顯示在狀態欄中提示文本。此外在注冊表的
hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>下還可以添加一個名稱為
menucustomize的字符串類型值，將該值設定為"help"將使菜單項出現在“幫助”菜單欄中，否則出現在“工具”欄中。

    當然，我們不會滿足于只是添加一個按鈕，執行一個程序，我們希望能夠獲得當用戶點擊按鈕時能夠操控當前
頁面，在注冊表的 hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>
下建立一個新的string類型的值，名稱設定為一個htm文件的全路徑名，同前面介紹的添加鼠標右鍵菜單一樣，在點擊
按鈕后ie會調用該文件，在文件中通過設定vbscript訪問external對象的menuarguments屬性就可以獲得瀏覽器中的
頁面。例如我們將hkey_local_machine/software/microsoft/internet explorer/extensions/<your guid>/vbscript
的值設定為c:/program files/samp.htm，然后在c:/program files下建立一個名為samp.htm的文件，在文件中輸入以下
腳本內容：
    <script language="vbscript">

    set objnetsamp=createobject("iecontextmenu.iemenu1")
    userurl=external.menuarguments.location.href
    call objnetsamp.addurl(userurl,"")

    </script>
    打開ie瀏覽器，點擊新建按鈕，就會彈出對話框顯示當前頁面的url。注意該項同前面設定的exec項不能夠同時使用。
    最后，對于按鈕圖標，ie需要兩種尺寸的圖標：20x20和16x16的，前者用于正常狀態下的顯示，后者用于在全屏幕
下的顯示，所以上面hoticon和icon指向的圖標資源應該是三個圖標的組合，這三個圖標的規格如下：
    16x16 16-色 icon (必須)
    20x20 16-色 icon (可選)
    20x20 256-色 icon (必須)
    在設計圖標時，256色圖標應該使用windows半色調調色板，而16色圖標使用windows 16色調色板。