Imports System.Web.Mail
Imports System.Xml



Public Class WebForm1

    Inherits System.Web.UI.Page

    Protected emailaddress As String
    Protected WithEvents first_name As System.Web.UI.WebControls.TextBox
    Protected WithEvents last_name As System.Web.UI.WebControls.TextBox
    Protected WithEvents email_address As System.Web.UI.WebControls.TextBox
    Protected WithEvents sendthemail As System.Web.UI.WebControls.Button
    Protected WithEvents comments As System.Web.UI.WebControls.TextBox

    Protected body As String


#Region " Web Form Designer Generated Code "

    'This call is required by the Web Form Designer.

    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub

    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init

        'CODEGEN: This method call is required by the Web Form Designer

        'Do not modify it using the code editor.

        InitializeComponent()

    End Sub

#End Region

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Public Sub sendthemailm(ByVal sender As Object, ByVal e As System.EventArgs)
        SmtpMail.SmtpServer = "mail.globalimage.com"
        Dim emailaddress As String
        Dim MailItem As New MailMessage


        MailItem.To = "jbolduc@globalimage.com"

        MailItem.From = "jasonb@globalimage.com"

        MailItem.Subject = "Question for Scott:"

        MailItem.BodyFormat = MailFormat.Text

        MailItem.Body = "E-mail of Customer: " + email_address.Text & vbCrLf + "First Name: " + first_name.Text & vbCrLf + "Last Name: " + last_name.Text & vbCrLf + "Question for Scott: " + comments.Text & vbCrLf

        SmtpMail.Send(MailItem)



    End Sub

End Class