vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fragen & Antworten rund um sev-Komponenten
Re: sevMail: Email speichern 
Autor: e_ditsche4352523
Datum: 26.03.10 16:15

Es wird kein Fehler gemeldet, es wird nur keine Datei ausgegeben.
Folgend mein Code (Pfade werden korrekt übergeben und TXTs sind auch gefüllt, habe es auch mit SMTP-Daten und .SendMail versucht):

With sevSMTP1

'Absenderangaben
.SenderName = Me!txtSenderName
.SenderEMail = Me!txtSenderEMail
.Organization = Me!txtOrganization
.ReplyTo = Me!txtReplyTo

' Empfänger
.Recipient = IIf(IsNull(Me!txtRecipient), "", Me!txtRecipient)
.CC = IIf(IsNull(Me!txtCC), "", Me!txtCC)
.BCC = IIf(IsNull(Me!txtBCC), "", Me!txtBCC)

' Nachricht
.Subject = IIf(IsNull(Me!txtSubject), "", Me!txtSubject)
.Message = IIf(IsNull(Me!txtMessage), "", Me!txtMessage)
.MessageHTML = FileRead(strPathTempDir & "\mailview.tmp")
.Notification = (Me!chkNotification <> 0)

Select Case Me!cmbPriority.Text
Case "Niedrig"
.Priority = sevMailPriority.Low
Case "Hoch"
.Priority = sevMailPriority.High
Case Else
.Priority = sevMailPriority.Normal
End Select

' Anlagen (autom. Zippen, wenn > 10 KB)
.AutoZIP = IIf(Me!chkAutoZIP <> 0, Val(IIf(IsNull(Me!txtKB), "", Me!txtKB)), 0)
.AttachmentClear
For i = 0 To Me!lvwAttachment.ListItems.Count - 1
.AttachmentAdd Me!lvwAttachment.ListItem(i).ListSubItems(2).Text
Next i

sevSMTP1.SaveMailTo = Send_GetNextFile()

End With


alles andere, wie u.a. Email-Daten lesen, läuft einwandfrei, nur eines noch, bei .. .Attachment.FileSize() bekomme ich höhere Werte für eine Datei im Anhang, als wenn ich die Datei extrahiere und dann mit FileLen() arbeite?
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
sevMail: Email speichern1.274e_ditsche435252326.03.10 03:27
Re: sevMail: Email speichern883ModeratorDieter26.03.10 06:08
Re: sevMail: Email speichern833e_ditsche435252326.03.10 16:15
Re: sevMail: Email speichern828ModeratorDieter26.03.10 20:11
Re: sevMail: Email speichern768e_ditsche435252327.03.10 08:03

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel