ナレッジベース

iNetMail 1.0J

動作保証環境と同様

修正済み

Smtpコントロールを使用してメール送信を繰り返した場合、メモリ使用量が増加し、メモリ不足が発生します。

この現象は本文を設定しない場合に発生します。

以下のコードで確認できます。
---------------------------------------------
　　Dim i As Integer
　　Dim iCnt As Integer
　　
　　iCnt = 100
　　
　　For i = 0 To iCnt - 1
　　　　With Smtp1
　　　　　　.Login "Server"
　　　　　　With .Message
　　　　　　　　.Subject = "テスト"
　　　　　　　　.To.Add "To@grapecity.com"
　　　　　　　　.From = "From@grapecity.com"
　　　　　　　　.Text = ""
　　　　　　End With
　　　　　
　　　　　　.Send
　　　　　　.Logout
　　　　End With
　　Next i
　　
　　MsgBox "送信終了"
---------------------------------------------

不具合を修正した最新の修正版をご使用ください。

最新修正版は、このサイトのアップデートページでダウンロードできます。

本文、あるいは以下のように改行コードを設定することにより回避することもできます。

　.Text = "" + vbCrLf

INML04325