Knowledge Share
Would you like to react to this message? Create an account in a few clicks or log in to continue.

Knowledge Share

Knowledge is NOT Power IMPLEMENTATION of knowledge is Power!!!
 
HomePortalGalleryRegisterLog in

 

 Automatic email after Coded UI Test execution

Go down 
AuthorMessage
Admin
Admin


Posts : 142
Points : 46895720
Reputation : 0
Join date : 2007-12-29
Location : Chennai

Automatic email after Coded UI Test execution Empty
PostSubject: Automatic email after Coded UI Test execution   Automatic email after Coded UI Test execution Icon_minitimeTue Jul 14, 2015 10:35 am

Dim message As MailMessage = New MailMessage
        Dim ggProcess As New Process

        ggProcess = Process.Start("EXCEL.EXE")

        ggProcess.Kill()
        Dim message1 As MailMessage = New MailMessage
        Dim ggProcess1 As New Process

                    proc(i).CloseMainWindow()

        Next i


        message.From = New MailAddress("mail id")

        message.To.Add(New MailAddress("mail id"))
        message.To.Add(New MailAddress("mail id"))



        message.To.Add(New MailAddress("mail id"))

       


        Dim oAttch As System.Net.Mail.Attachment = New System.Net.Mail.Attachment("Path")


        'Dim oAttch1 As System.Net.Mail.Attachment = New System.Net.Mail.Attachment(report")
        'Dim oAttch2 As System.Net.Mail.Attachment = New System.Net.Mail.Attachment("report")
        message.Attachments.Add(oAttch)
        'message.Attachments.Add(oAttch1)
        'message.Attachments.Add(oAttch2)
        Dim reader As StreamReader = New StreamReader("path")
        message.Body = reader.ReadToEnd()
        message.IsBodyHtml = True
        Dim client As SmtpClient = New SmtpClient()
        Dim smtp As SmtpClient = New SmtpClient
        smtp.Host = ("smtp server name")
        smtp.EnableSsl = Convert.ToBoolean(True)//Optional
         NetworkCred.UserName = ("mail id")
        NetworkCred.Password = ("pwd")
        smtp.UseDefaultCredentials = True
        smtp.Credentials = NetworkCred
        smtp.Port = Integer.Parse("number")
        smtp.Send(message)
Back to top Go down
https://knowledgeshare.forumotion.com
 
Automatic email after Coded UI Test execution
Back to top 
Page 1 of 1
 Similar topics
-
» 1000000000+ Email Addresses With Bulk Email Sender

Permissions in this forum:You cannot reply to topics in this forum
Knowledge Share :: Testing :: Automation :: VSTS :: CODED UI-
Jump to: