방법: Outlook에서 항목 복사
업데이트: 2007년 11월
적용 대상 |
---|
이 항목의 정보는 지정된 Visual Studio Tools for Office 프로젝트 및 Microsoft Office 버전에만 적용됩니다. 프로젝트 형식
Microsoft Office 버전
자세한 내용은 응용 프로그램 및 프로젝트 형식에 따라 사용 가능한 기능을 참조하십시오. |
이 예제에서는 메일 항목의 복사본을 만들어 사용자에게 표시합니다.
예제
Private Sub ThisAddIn_Startup(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles Me.Startup
Dim mail As Outlook.MailItem = _
TryCast(Me.Application.GetNamespace("MAPI"). _
GetDefaultFolder(Outlook.OlDefaultFolders.olFolderInbox). _
Items.GetFirst(), Outlook.MailItem)
If mail IsNot Nothing Then
' Create a copy of the item.
Dim copyMail As Outlook.MailItem = _
TryCast(mail.Copy(), Outlook.MailItem)
' Show the copy to the user.
copyMail.Display(True)
End If
End Sub
private void ThisAddIn_Startup(object sender, System.EventArgs e)
{
Outlook.MailItem mail = this.Application.GetNamespace("MAPI").
GetDefaultFolder(Outlook.OlDefaultFolders.olFolderInbox).
Items.GetFirst() as Outlook.MailItem;
if (mail != null)
{
// Create a copy of the item.
Outlook.MailItem copyMail = mail.Copy() as Outlook.MailItem;
// Show the copy to the user.
copyMail.Display(true);
}
}