二、實現

　　1、如果你使用的是VB那編程就簡單多了：

　　首先，在Project菜單選擇References，添加Messenger API Type Library，然后，幾行代碼就可以了：

　　''Messenger Object

　　Dim MSNMessenger As New MessengerAPI.Messenger

　　''Contacts Collection

　　Dim MSNMyContacts As IMessengerContacts

　　''One Contact

　　Dim MSNMyContact As IMessengerContact

　　Set MSNMyContacts = MSNMessenger.MyContacts

　　''Enumerating the contact

　　For Each MSNMyContact In MSNMyContacts

　　MsgBox MSNMyContact.FriendlyName & MSNMyContact.SigninName

　　Next

　　這就完成了聯系人列表，這就是VB對Automation支持的方便之處。

　　2、如果用VC就要復雜一點，但代碼也比較簡單，問題是我們沒有微軟提供的.h文件，也沒有.tlb，文件。

　　(1) 如何取得MSN的.tlb文件，有些用Import “msnmsgr.exe”，但得到的.tlh文件中根本沒有Messenger對象，我們知道能在 VB中使用肯定需要Type Library，所以我們可以利用Visual Studio Tools 中的OLEView來生成一個.tlb文件 (如果誰有更好的方式請告之)，本文源碼中已經生成好了.tlb文件，大家直接用就可以了。

　　(2) 有了.tlb文件，接下來的工作就很簡單了：

　　IMessengerPtr　　　　　MSNMessager = NULL;

　　IMessengerContactsPtr　MSNMessagerContacts = NULL;

　　IMessengerContactPtr　 MSNMessagerContact　= NULL;

　　HRESULT hr = MSNMessager.CreateInstance(__uuidof(Messenger));

　　if (FAILED(hr))

　　{

　　AfxMessageBox("Create the Messenger object failed!");

　　return;

　　}

　　MSNMessagerContacts = MSNMessager->GetMyContacts();

　　if (NULL == MSNMessagerContacts)

　　{

　　AfxMessageBox("the Messenger object GetMyContacts failed!");

　　return;

　　}

　　2010年9月計算機等級考試成績查詢時間匯總

　　2011年計算機等級考試二級C++輔導筆記匯總

　　2011年上半年計算機等級考試報名時間匯總

　　2011計算機等級考試二級C++輔導實例編程匯總