Protected Sub SendButton_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles SendButton.Click

        Dim emailFrom As String
        Dim emailTo As String = "ivan.weiss@elitefse.com"
        Dim emailSubject As String = "Project Work Request"
        Dim emailBody As String
        Dim emailClient As New Mail.SmtpClient("207.41.178.150", 25)

        Select Case RequesterNameDropDownBox.SelectedValue
            Case "Rick DiFilippi"
                emailFrom = "rdifilippi@studioedesigngroup.com"
            Case "Sheron Makara"
                emailFrom = "sheron.makara@elitefse.com"
            Case "Craig Marshall"
                emailFrom = "craig.marshall@elitefse.com"
            Case "Josh Mass"
                emailFrom = "joshua.mass@elitefse.com"
            Case "Mike Simonds"
                emailFrom = "mike.simonds@elitefse.com"
            Case "Mike Watson"
                emailFrom = "michael.watson@elitefse.com"
            Case "Eric Weiss"
                emailFrom = "eric.weiss@elitefse.com"
            Case "Ivan Weiss"
                emailFrom = "ivan.weiss@elitefse.com"
            Case "Vijaye Yarna"
                emailFrom = "vijaye.yarna@elitefse.com"
            Case Else
                emailFrom = "ivan.weiss@elitefse.com"
        End Select

        emailBody = "<p><h2>Client</h2></p><p>Company:  " & ClientCompanyTextBox.Text & "</p><p>Address1:  " & ClientAddress1TextBox.Text & "</p><p>Address2:  " & ClientAddress2Textbox.Text & "</p><p>Phone:  " & ClientPhoneTextBox.Text & "</p><p>Email:  " & ClientEmailTextBox.Text & "</p><p><h2>Architect</h2></p><p>Company:  " & ArchitectCompanyTextBox.Text & "</p><p>Address1:  " & ArchitectAddress1TextBox.Text & "</p><p>Address2:  " & ArchitectAddress2TextBox.Text & "</p><p>Phone:  " & ArchitectPhoneTextBox.Text & "</p><p>Email:  " & ArchitectEmailTextBox.Text & "</p>"
        Try
            Dim emailMessage As New Mail.MailMessage(emailFrom, emailTo, emailSubject, emailBody)
            'Dim emailMessage As New Mail.MailMessage(emailFrom, emailTo)

            emailMessage.IsBodyHtml = True
            emailMessage.Body = emailBody
            emailMessage.Subject = emailSubject

            emailClient.DeliveryMethod = Mail.SmtpDeliveryMethod.Network
            emailClient.Send(emailMessage)
            MsgBox("Email successfully sent.", MsgBoxStyle.Information, "Email Success")
            Exit Sub
        Catch ex As Exception
            MsgBox("Error in sending email.  See System Administrator.", MsgBoxStyle.Critical, "Email Failure")
            Exit Sub
        End Try
    End Sub

<div>
        <asp:Button ID="SendButton" Text="Send"
            ToolTip="Click to send project request form" runat="server"
            onclick="SendButton_Click" TabIndex="13" Width="165px" />
    </div>