Visual Basic

Private Sub MakeDataView()
    Dim view As DataView = New DataView
    With view
        .Table = DataSet1.Tables("Suppliers")
        .AllowDelete = True
        .AllowEdit = True
        .AllowNew = True
        .RowFilter = "City = 'Berlin'"
        .RowStateFilter = DataViewRowState.ModifiedCurrent
        .Sort = "CompanyName DESC"
    End With
    
    ' Simple-bind to a TextBox control
    Text1.DataBindings.Add("Text", view, "CompanyName")
End Sub

   Dim smtpClient As New Net.Mail.SmtpClient()
        Dim mail As New Net.Mail.MailMessage()
        'create the message to be sent 
        mail.To.Add("test@test.com") ' Enter the Email of the person you want to send the mail to
        mail.From = New Net.Mail.MailAddress("username@gmail.com", "Your Display Name") ' Enter Your email address
        mail.Subject = "Test Message"
        mail.Body = "This is a test message"
        ' Prepare the client to send the above message
        smtpClient.Host = "smtp.gmail.com"
        smtpClient.EnableSsl = True
        smtpClient.Port = 587
        smtpClient.Credentials = New Net.NetworkCredential("username@gmail.com", "password") 'Enter username and password of the account , you want to use to send mail
        smtpClient.DeliveryMethod = Net.Mail.SmtpDeliveryMethod.Network
        smtpClient.Send(mail)


<pre>

helen00 wrote:

I am beginner in VB programming.