Protected Sub SubmitForm_Click(ByVal sender As Object, ByVal e As System.EventArgs)
If Not Page.IsValid Then Exit Sub
Dim SendResultsTo As String = "pzoll@imagsts.com"
Dim smtpMailServer As String = "mail.yoursmtp.com"
Dim smtpUsername As String = "yourusername"
Dim smtpPassword As String = "yourpassword"
Dim MailSubject As String = "Form Results"
Dim msgBody As StringBuilder = New StringBuilder()
msgbody.Append( "Name: " & txtName.text & vbCrLF)
msgbody.Append( "ContcatName: " & txtName.text & vbCrLF)
msgbody.Append( "Name: " & txtName.text & vbCrLF)
msgbody.Append( "Name: " & txtName.text & vbCrLF)
msgBody.Append("Browser: " & Request.UserAgent & vbCrLf )
msgBody.Append("IP Address: " & Request.UserHostAddress & vbCrLf)
msgBody.Append("Server Date & Time: " & DateTime.Now & vbCrLf)