110,571
社区成员
发帖
与我相关
我的任务
分享
public Outlook.MailItem olApp_Mail;
private void ReViewMailContent()
{
object refMissing = System.Reflection.Missing.Value;
string strFN;
int intdgIndex = 0;
MainForm.StatusBar1.Panels(0).Text = "Now, Opening the mail file! Please Wait...";
rtbMailContent.Text = "";
if (dgMailList.CurrentRowIndex == -1) {
MainForm.StatusBar1.Panels(0).Text = "Ready";
return; // TODO: might not be correct. Was : Exit Sub
}
else {
intdgIndex = (int)dgMailList.Item(dgMailList.CurrentRowIndex, 6);
olApp_Mail = MailCol.Item(intdgIndex);
if (bolActivateOutlook == false) {
if ((olApp.ActiveExplorer == null) == false) {
try {
Interaction.AppActivate(olApp.ActiveExplorer.Caption);
}
catch (Exception ex) {
}
}
bolActivateOutlook = true;
Timer1.Start();
}
try {
rtbMailContent.Text = "寄件人: " + olApp_Mail.SenderEmailAddress + " " + olApp_Mail.SentOn + Constants.vbCrLf;
rtbMailContent.Text += "收件時間: " & olApp_Mail.ReceivedTime + Constants.vbCrLf;
rtbMailContent.Text += "收件人: " & olApp_Mail.To + Constants.vbCrLf;
rtbMailContent.Text += "副本: " & olApp_Mail.CC + Constants.vbCrLf;
rtbMailContent.Text += "附件和附圖數量: " + olApp_Mail.Attachments.Count + Constants.vbCrLf;
rtbMailContent.Text += "主題: " + olApp_Mail.Subject + Constants.vbCrLf;
rtbMailContent.Text += Constants.vbCrLf;
rtbMailContent.Text += olApp_Mail.Body }
catch (Exception ex) {
MainForm.StatusBar1.Panels(0).Text = "System Error!";
return; }
}
MainForm.StatusBar1.Panels(0).Text = "Ready";
}