當您使用 AppendBody 方法，在 [Microsoft 動態航行點 2009 Service Pack 1 中建立電子郵件訊息時，電子郵件訊息內文不正確

檔案資訊

檔案屬性 （或較新的檔案屬性），此 hotfix 的全球版本具有下表中所列。這些檔案的日期和時間會以國際標準時間 (UTC) 格式列出。當您檢視檔案資訊時，會將它轉換為本地時間。若要查看 UTC 與當地時間的時差，請在 [控制台] 中的日期和時間項目使用 [時區] 索引標籤。

若要解決這個問題，請依照下列步驟執行：

1. 將複製的檔案，您從 hotfix 檔案解壓縮至下列資料夾︰

   C:\Program 使用必要動態 NAV\Mail

2. 註冊新的 Navision.Mail.dll 組件，在下列資料夾︰

   regasm / 程式碼基底 /tlb:Navision.Mail.tlb Navision.Mail.dll

3. 請加入資料行 6 中的 SMTP 郵件設定 table(409)，請依照下列︰

   ...{ 6   ;   ;SMTP Server Port    ;Integer       ;InitValue=25; }
   ...
   
   

4. 將 SMTP 伺服器連接埠中的欄位，請依照下列 SMTP 郵件設定 form(409):

   ...{ 14  ;TextBox      ;3850 ;1540 ;5500 ;440  ;Name=<SMTP Server Port>;
                                                    ParentControl=1;
                                                    InPage=0;
                                                    DecimalPlaces=0:0;
                                                    NotBlank=Yes;
                                                    Numeric=Yes;
                                                    SourceExpr="SMTP Server Port";
                                                    MinValue=1 }
   { 15  ;Label        ;440  ;1540 ;3300 ;440  ;ParentControl=14; }
   ...
   
   

5. 變更 SMTP 郵件 codeunit(400) 中的程式碼如下所示︰
   現有的程式碼 1

   ...      Mail@1000 : Automation "{68AEAA7B-9523-3511-AF5F-F2381D2C6F04} 1.0:{F9DAE2A4-D2F8-37C3-86D5-E4FFE166D860}:'Microsoft Navision Mail'.SmtpMessage";
   ...
   
   

   取代程式碼 1

   ...      Mail@1000 : Automation "{68AEAA7B-9523-3511-AF5F-F2381D2C6F04} 7.2:{F9DAE2A4-D2F8-37C3-86D5-E4FFE166D860}:'Microsoft Navision Mail'.SmtpMessage";
   ...
   
   

   
   
   現有的程式碼 2

       PROCEDURE Send@3();    VAR
         Result@1000 : Text[1024];
       BEGIN
         WITH SMTPMailSetup DO
           Result :=
             Mail.Send(
               "SMTP Server",Authentication <> Authentication::Anonymous,"User ID",Password,"SMTP Server Port");
         CLEAR(Mail);
         IF Result <> '' THEN
           ERROR(Text003,Result);
       END;
   

   取代程式碼 2

       PROCEDURE Send@3();    VAR
         Result@1000 : Text[1024];
       BEGIN
         WITH SMTPMailSetup DO
           Result :=
             Mail.Send(
               "SMTP Server",Authentication <> Authentication::Anonymous,"User ID",Password,"SMTP Server Port");
         Mail.Dispose;
         CLEAR(Mail);
         IF Result <> '' THEN
           ERROR(Text003,Result);
       END;
   

先決條件

您必須擁有 Microsoft 動態航行點 2009 Service Pack 1 安裝套用此 hotfix 之後。