Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Mail senden

Frage Entwicklung VB for Applications

Mitglied: Cadsys-Chemnitz

Cadsys-Chemnitz (Level 1) - Jetzt verbinden

15.04.2009, aktualisiert 15:12 Uhr, 2515 Aufrufe, 1 Kommentar

Ich hab folgendes Problem. Ich habe ein Excelfile das automatisch erzeugt wird. In Diesen liegt ein vollständiges Infoangebot für unseren Kunden.

Dieses will ich per MAil verschicken, der Code sieht so aus:


01.
 
02.
    Private Sub InfoangebotPerMailToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InfoangebotPerMailToolStripMenuItem.Click 
03.
 
04.
        Dim msgBody 
05.
 
06.
        msgBody = "Im Anhang finden Sie Ihr Infoangebot!" 
07.
 
08.
        MySendMail("tfuchs@xxx.de", msgBody, "Ihr Infoangebot.") 
09.
    End Sub 
10.
 
11.
    Sub MySendMail(ByVal Recipient, ByVal msg, ByVal subject) 
12.
 
13.
        Dim OpenFileDialog As New OpenFileDialog 
14.
        OpenFileDialog.InitialDirectory = Kunden & "\" 
15.
        OpenFileDialog.Filter = "Textdateien (*.xls)|*.xls" 
16.
        OpenFileDialog.ShowDialog(Me) 
17.
        Dim FileName As String = OpenFileDialog.FileName 
18.
 
19.
        Dim objSession, oInbox, colMessages, oMessage, colRecipients 
20.
 
21.
        objSession = CreateObject("MAPI.Session") 
22.
        objSession.Logon("Outlook") 
23.
 
24.
        oInbox = objSession.Inbox 
25.
        colMessages = oInbox.Messages 
26.
        oMessage = colMessages.Add() 
27.
        colRecipients = oMessage.Recipients 
28.
 
29.
        colRecipients.Add(Recipient) 
30.
        colRecipients.Resolve() 
31.
 
32.
        oMessage.Subject = subject 
33.
        oMessage.Text = msg 
34.
        oMessage.AttachmentPathName = FileName 
35.
 
36.
        oMessage.Send() 
37.
 
38.
        objSession.Logoff() 
39.
        objSession = Nothing 
40.
 
41.
    End Sub 
42.
 
Bei der Zeile

01.
        oMessage.AttachmentPathName = FileName
kommt eine Fehlermeldung:

Der offentliche Member AttachmentPathName für den Typ Message wurde nicht gefunden.

Wenn ich diese Zeile entferne geht es einwandfrei nur fehlt dann der Anhang. Am fehlenden Verweis kann es nicht liegen weil die anderen oMessage. Befehle ja gehen. Und laut MSDN lautet der Befehl oMessage.AttachmentPathName = FileName .

Wo liegt der Fehler ? Hat einer eine Idee?
Mitglied: AndreasHoster
15.04.2009 um 15:51 Uhr
Aus der MS Webseite (http://msdn.microsoft.com/en-us/library/aa228327(VS.60).aspx):
Specifies the full path name of the currently indexed attachment. This property is not available at design time. It is read-only unless MsgIndex is set to -1.

Ich sehe nicht, daß MsgIndex auf -1 gesetzt ist.
Und dann muß man noch den AttachmentIndex erhöhen (http://msdn.microsoft.com/en-us/library/aa228313(VS.60).aspx):
To add a new attachment, set the AttachmentIndex to a value greater than or equal to the current attachment count while in the compose buffer (MsgIndex = -1). The AttachmentCount property is updated automatically to reflect the implied new number of attachments.

Ob das alles war kann ich nicht sagen, bin Outlook frei.
Bitte warten ..
Ähnliche Inhalte
E-Mail
Mail Senden über Telnet
gelöst Frage von mexxE-Mail7 Kommentare

Hallo, ich betreibe einen eigenen Mailserver hinter einer festen IP. Wenn ich per Client wie Thunderbird oder emClient den ...

Exchange Server
Sender von einer Mail mit einem Anhang suchen
gelöst Frage von TheHawkExchange Server3 Kommentare

Guten Tag, Es ist so dass bei uns ein User Mails intern und oder extern verschickt hat welche er ...

Exchange Server
Exchange Server Mail senden
gelöst Frage von MorrowToonExchange Server5 Kommentare

Hallo, ich habe mal eine Frage zu Exchange Server. Z.B. haben wir 10 Mailaccounts auf einem Exchange Server, diese ...

Batch & Shell
Bash Mail senden
gelöst Frage von MarabuntaBatch & Shell7 Kommentare

Hallo, ich versuche eine einfache Mail mittels Bash zu verschicken. Die mailbody.txt ist leer. Auch mit sinnvollen Parametern kann ...

Neue Wissensbeiträge
Verschlüsselung & Zertifikate

Die Hölle friert ein weiteres Stück zu: Microsoft integriert OpenSSH in Windows

Information von ticuta1 vor 32 MinutenVerschlüsselung & Zertifikate

Interessant SSH-Kommando in CMD.exe und PowerShell

Apple

IOS 11.2.1 stopft HomeKit-Remote-Lücke

Tipp von BassFishFox vor 1 TagApple

Das Update für iPhone, iPad und Apple TV soll die Fernsteuerung von Smart-Home-Geräten wieder in vollem Umfang ermöglichen. Apple ...

Windows 10

Windows 10 v1709 EN murkst bei den Regionseinstellungen

Tipp von DerWoWusste vor 1 TagWindows 10

Dieser kurze Tipp richtet sich an den kleinen Personenkreis, der Win10 v1709 EN-US frisch installiert und dabei die englische ...

Webbrowser

Kein Ton bei Firefox Quantum über RDP

Tipp von Moddry vor 1 TagWebbrowser

Hallo Kollegen! Hatte das Problem, dass der neue Firefox bei mir auf der Kiste keinen Ton hat, wenn ich ...

Heiß diskutierte Inhalte
Windows Server
RODC kann nicht aus Domäne entfernt werden
Frage von NilsvLehnWindows Server18 Kommentare

HAllo, ich arbeite in einem Universitätsnetzwerk mit 3 Standorten. Die Standorte haben alle ein ESXi Cluster und auf diesen ...

Hardware
Kein Bild mit nur einer bestimmten Grafikkarten - Mainboard Konfiguration
gelöst Frage von bestelittHardware18 Kommentare

Hallo zusammen, ich hatte schon einmal eine ähnliche Frage gestellt. Damals hatte ich genau das gleiche Problem. Allerdings lies ...

Netzwerkmanagement
Mehrere Netzwerkadapter in einem PC zu einem Switch zusammenfügen
Frage von prodriveNetzwerkmanagement17 Kommentare

Hallo zusammen Vorweg, ich konnte schon einige IT-Probleme mit Hilfe dieses Forums lösen. Wirklich klasse hier! Doch für das ...

Hardware
Links klick bei Maus funktioniert nicht
gelöst Frage von Pablu23Hardware16 Kommentare

Hallo erstmal. Ich habe ein Problem mit meiner relativ alten maus jedoch denke ich nicht das es an der ...