[Question]E-mail(Bug Report)

[php]Imports System.Net.Mail
Public Class SubmitBug

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Dim msg As New MailMessage(senderID.Text, recievers.Text, subj.Text, emailbody.Text)
Dim client As New SmtpClient("smtp.gmail.com", 587)
Dim Credentials As New System.Net.NetworkCredential(senderID.Text, pass.Text)


client.Credentials = Credentials

client.EnableSsl = True

client.Send(msg)



MsgBox("Your email has been sent Thank you for taking the Time To Notify me there's a bug | Credits to MJLover For The Source Code For The Submit Bug|.")

Timer1.Stop()
Timer1.Enabled = False
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
MsgBox(" Please Visit mpgh.net For The Best VIP Hacks, Pub Hacks + More", MsgBoxStyle******rmation + MsgBoxStyle.OkOnly)
Me.Close()
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
System.Diagnostics.Process.Start("http://mpgh.net")
End Sub
Private Sub Label11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label11.Click
Form1.Show()
Me.Hide()
End Sub
Private Sub Subj_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Subj.Click
Subj.Text = ""
End Sub
End Class[/php]