Gegevens per Email verstuuren via VB 2008

[DennisBosma]

Hallo,

Ik ben op zoek naar een manier hier iemand gegevens van zichzelf kan versturen na het invullen van een lijstje. Ik heb het nodig voor een project voor mijn die ik moet maken voor mijn vak. (een opdracht)

Kan iemand de code geven of volledig in de code plakken/kinppen enz... dat zou heeeeel fijn zijn..

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Try
    Directory.CreateDirectory(Application.StartupPath & "\backup\")
    If Not ComboBox1.Text = "" Then
    Dim savef As New System.IO.StreamWriter(Application.StartupPath & "\Backup\" & ComboBox1.Text & ".txt")
    savef.Write("Het verwijderen van deze informatie kan schade aanrichten in uw register." + ControlChars.NewLine + ControlChars.NewLine + ComboBox1.Text + ControlChars.NewLine + TextBox1.Text)
    savef.Close()
    Me.Close()
    Else : End If
    Catch ex As Exception : End Try
    End Sub

Alvast bedankt! :thumb:

 

[Hoornvan]

DennisBosma,

Zo maar een vraag.
Zit je niet op de verkeerde afdeling?
Hier is het namelijk voor VBA.
Ook heb ik geen idee of de code van VB 2008 het zelfde is als bij VBA.

De volgende keer graag je code selecteren en dan op het # teken klikken, komt de code in een apart vak te staan.

Volgens mij moet je bij Programeren / VB zijn.

Suc6