Springen naar inhoud


- - - - -
VS 2015

E Mail Verzenden Met Smtp Server



  • Log in a.u.b. om te beantwoorden
Er zijn 2 reacties in dit onderwerp

#1 Luc2803

Luc2803

    Starting Developer

  • Leden
  • 11 berichten
    Laatst bezocht gisteren, 10:51

Geplaatst op 05 januari 2021 - 14:53

Hallo,

Deze code werkt als ik het "paswoord" invoer in de code.
Het is echter de bedoeling dat meerdere gebruikers dit kunnen gebruiken.
Ik heb echter een probleem om een Email te verzenden als ik het gedeelte "paswoord" verander in een Textbox met PasswordChar.

Code:
Try
		 Dim Smtp_Server As New SmtpClient
		 Dim e_mail As New MailMessage()
		 Smtp_Server.UseDefaultCredentials = False
		 Smtp_Server.Credentials = New Net.NetworkCredential(TextBox1.Text, Textbox4.Text)
		 Smtp_Server.Port = 587
		 Smtp_Server.EnableSsl = True
		 Smtp_Server.Host = "smtp.gmail.com"
		 e_mail = New MailMessage()
		 e_mail.From = New MailAddress(TextBox1.Text)
		 e_mail.To.Add(TextBox2.Text)
		 e_mail.Subject = TextBox3.Text
		 e_mail.IsBodyHtml = False
		 e_mail.Body = RichTextBox1.Text
		 Smtp_Server.Send(e_mail)
		 MsgBox("Mail Sent")
	 Catch error_t As Exception
		 MsgBox(error_t.ToString)
	 End Try


Dan krijg ik een foutmelding zie bijlage.
Hoe kan ik dit voorkomen?

Bijgevoegde Bestanden



#2 Luc2803

Luc2803

    Starting Developer

  • Leden
  • 11 berichten
    Laatst bezocht gisteren, 10:51

Geplaatst op 10 januari 2021 - 11:43

De oplossing gevonden door Textbox4 te vervangen in de code door een Label.
De label in de form onzichtbaar gemaakt.
Dit is misschien niet de voorziene oplossing maar het werkt.

#3 Damic

Damic

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 793 berichten
    Laatst bezocht 28 feb 2021 17:06
  • LocatieMechelen (BE)

Geplaatst op 17 januari 2021 - 11:38

Ik moest even zoeken maar je kan ook een maskedTextbox gebruiken dan heb je altijd de ingegeven text als text maar de gebruiker ziet alleen je ingesteld mask





Ook met taq VS 2015 voorzien

0 gebruiker(s) lezen dit onderwerp

0 lid(leden), 0 bezoeker(s), 0 anonieme gebruikers

Inloggen


[VS 2015] Untitled 1

Met dank aan J├╝rgen voor de jarenlange inzet van visualbasic.be (anno dec 2000)
Met dank aan Mike en Ronneke voor de jarenlange inzet van vbib.be (anno dec 2010)
Met dank aan PascalBianca voor de jarenlange inzet van vbib.be (anno dec 2016)