Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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
GELÖST

Visual Basic 2010 Express eMail mit Anhang

Frage Entwicklung Visual Studio

Mitglied: 105255

105255 (Level 1)

05.05.2012, aktualisiert 05.06.2012, 8164 Aufrufe, 7 Kommentare

Habe versucht, Mails per smtp an email-adresse zu senden, aber ich habe probleme mit dem Attachment.

Hallo Miteinander!

Ich habe mir das folgende Video angeschaut:
http://www.youtube.com/watch?v=Yg22Xw4R0wg

Jetzt wollte ich es nachstellen. Allerdings kommt immer die Meldung:

Fehler 1 "attachment" ist kein Member von "System.Net.Mail.MailMessage". C:\Users\Administrator\Documents\Visual Studio 2010\Projects\email\email\Form1.vb 12 13 email

Ich bin bisher bei folgendem Code:





01.
Imports System.Net.Mail 
02.
Public Class form1 
03.
 
04.
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SendeMail.Click 
05.
        Dim email As New MailMessage 
06.
        email = New MailMessage 
07.
        email.From = New MailAddress("meine email") 
08.
        email.To.Add("meine email") 
09.
        email.Subject = Text 
10.
        email.Body = Text 
11.
        For i = 0 To (Me.ListBox1.Items.Count - 1) 
12.
            email.attachment.add(New Attachment(Me.ListBox1.Items(i))) 
13.
        Next 
14.
        Dim smtpSenden As New SmtpClient("Smtp.gmail.com") 
15.
        smtpSenden.Port = 587 
16.
        smtpSenden.EnableSsl = True 
17.
        smtpSenden.Credentials = New System.Net.NetworkCredential("meine email", "mein passwort") 
18.
        smtpSenden.Send(email) 
19.
    End Sub 
20.
 
21.
    Private Sub anhang_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles anhang.Click 
22.
        OpenFileDialog1.ShowDialog() 
23.
        If OpenFileDialog1.CheckFileExists = True Then 
24.
            Me.ListBox1.Items.Add(OpenFileDialog1.FileName) 
25.
        End If 
26.
    End Sub 
27.
End Class

Das ganze schaut bisher so aus:
cf5685f5c979da903097f4fecfc23e36 - Klicke auf das Bild, um es zu vergrößern

Der Fehler schaut so aus:
681aee35cf5111583978b948ca973283 - Klicke auf das Bild, um es zu vergrößern

Ich habe meine Project-Mappe (.sln-Datei) hier gespeichert:
http://www.file-upload.net/download-4328465/email.sln.html

Kann mir bitte irgendwer helfen?
Ich nutze Win 7 Service-Pack 1

Danke im Vorraus!

Chris
Mitglied: 76109
05.05.2012 um 11:14 Uhr
Hallo ChrisAicher!

Versuchs mal mit:
email.attachments.add(New Attachment(Me.ListBox1.Items(i)))

Gruß Dieter
Bitte warten ..
Mitglied: 105255
05.05.2012 um 11:28 Uhr
Hallo
vielen, lieben Dank, bis zum Ausführen funktioniert es, allerdings kommt jetzt ein anderer Fehler!

Aber immerhin hast du mir weitergeholfen!
Danke

Chris
Bitte warten ..
Mitglied: 105255
05.05.2012 um 11:30 Uhr
Kannst du es dir bitte mal downloaden von

http://www.file-upload.net/download-4328465/email.sln.html

und dann auf Fehlersuche gehen?
Ich bin erst 13 Jahre alt.

Chris
Bitte warten ..
Mitglied: 76109
05.05.2012 um 11:43 Uhr
Hallo Chris!

Sorry, aber ich habe leider kein Visual Studio auf meinem Rechner installiert

Gruß Dieter
Bitte warten ..
Mitglied: 105255
05.05.2012 um 12:35 Uhr
hallo
kannst du sonst noch was machen?
vielleicht das programm installieren oder noch im Code forschen?
danke.

chris
Bitte warten ..
Mitglied: wiesi200
05.05.2012 um 16:31 Uhr
Hallo,

wollt's mir mal ansehen grade weil mein VB Kenntnisse schon wieder etwas eingerostet sind.
Pack bitte mal das ganze Projekt die sln Datei bringt nicht viel.

Ach im Forum gibt's spezielle Codeformatierungen
Bitte warten ..
Mitglied: wiesi200
05.05.2012 um 16:54 Uhr
Hab's mir mal so angesehen.
>
01.
>Imports System.Net.Mail 
02.
> Public Class form1 
03.
>  
04.
>     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SendeMail.Click 
05.
>         Dim email As New MailMessage 
06.
>         email = New MailMessage 
07.
> //Hier solltest du schon auf deine Felder verweisen im der Art (tbAN.Test) vor allem da auch die Adresse überprüft wird 
08.
>         email.From = New MailAddress("meine email") 
09.
>         email.To.Add("meine email") 
10.
>         email.Subject = Text 
11.
>         email.Body = Text 
12.
>         For i = 0 To (Me.ListBox1.Items.Count - 1) 
13.
>//die Zeile muss Lauten email.attachments.add 
14.
>             email.attachment.add(New Attachment(Me.ListBox1.Items(i))) 
15.
>         Next 
16.
>         Dim smtpSenden As New SmtpClient("Smtp.gmail.com") 
17.
>//Bin hier auf Port 25 und SSL = False gegangen. Bei mir hat's nen Zertifikatsfehler gebracht. 
18.
>         smtpSenden.Port = 587 
19.
>         smtpSenden.EnableSsl = True 
20.
>         smtpSenden.Credentials = New System.Net.NetworkCredential("meine email", "mein passwort") 
21.
>         smtpSenden.Send(email) 
22.
>     End Sub 
23.
>  
24.
>     Private Sub anhang_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles anhang.Click 
25.
>         OpenFileDialog1.ShowDialog() 
26.
>         If OpenFileDialog1.CheckFileExists = True Then 
27.
>             Me.ListBox1.Items.Add(OpenFileDialog1.FileName) 
28.
>         End If 
29.
>     End Sub 
30.
> End Class 
31.
>
Dann hat's geklappt.
Dein Hauptproblem ist da einfach das Zertifikat für SSL
Bitte warten ..
Neuester Wissensbeitrag
CPU, RAM, Mainboards

Angetestet: PC Engines APU 3a2 im Rack-Gehäuse

Erfahrungsbericht von ashnod zum Thema CPU, RAM, Mainboards ...

Ähnliche Inhalte
Visual Studio
gelöst Remotedienst prüfen mit Visual Basic (1)

Frage von flyingmichael zum Thema Visual Studio ...

Visual Studio
Mit Visual Basic auf Shopware 5 API zugreifen (9)

Frage von SmogKiel zum Thema Visual Studio ...

Windows Tools
gelöst Visual Studio 2010 Ultimate Download? (6)

Frage von Herbrich19 zum Thema Windows Tools ...

Heiß diskutierte Inhalte
Windows Server
DHCP Server switchen (25)

Frage von M.Marz zum Thema Windows Server ...

Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

Windows Server
Mailserver auf Windows Server 2012 (8)

Frage von StefanT81 zum Thema Windows Server ...

Backup
Clients als Server missbrauchen? (8)

Frage von 1410640014 zum Thema Backup ...