Freigabe nach Attachment in VB2010

[P. F. (pfuhsy)]

Hallo,

ich hab ein kleines Programm geschrieben, welches mir eine Email mit 
Anhang verschicken kann. Das funktioniert auch, doch wenn ich nach dem 
Verschicken den Anhang löschen will, kommt eine Fehlermeldung dass diese 
Datei vom anderen Prozess verwendet wird. Der Prozess wird 
wahrschenilich der sein, der auch die Email verschickt, doch wieder 
bekomme ich die Datei wieder freigegeben ?

   Private Sub Email_versenden(ByVal Text As String, ByVal Betreff As String, Optional ByVal Mit_Anhang As Boolean = False)
        Try
            Dim Mailadresse As String = "[e-mail]" 'Emailadresse festlegen
            Dim Passwort As String = "xxx" 'Passwort festlegen
            Dim MyEmail As New MailMessage
            Dim Anhang As Attachment

            MyEmail.From = New MailAddress(Mailadresse) 'Absender
            MyEmail.To.Add(Mailadresse) 'Empfänger
            MyEmail.Subject = Betreff 'Betreff
            MyEmail.Body = Text 'Inhalt der Email

            If Mit_Anhang Then
                'Anhang vorbereiten
                Dim Inhalt() As String = Directory.GetFiles(Verzeichnis)

                For i = 0 To Inhalt.GetUpperBound(0)
                    Anhang = New Attachment(Inhalt(i))
                    MyEmail.Attachments.Add(Anhang)
                Next
            End If
            
            'Zugriff auf den Account
            Dim smtp As New SmtpClient("smtp.web.de")
            smtp.Port = 587 'Standardport
            smtp.EnableSsl = True 'sichere Übertragung ermöglichen
            smtp.Credentials = New System.Net.NetworkCredential(Mailadresse, Passwort)  'Anmeldeinfos bereitstellen

            smtp.Send(MyEmail) 'Email versenden

        Catch ex As Exception
            'MsgBox("Email-Fehler") 'zu Testzwecken
        End Try

[Arc N. (arc)]

MyEmail.Dispose() fehlt noch nach dem Senden.