
<%
		Dim myMessage As NewMailMessage
		Dim myMail    As New SmtpMail
		Dim strEmail  As String

		
			strEmail = "gurun@mercury.me.metu.edu.tr"

			myMessage.From = "webmaster@" & Request.ServerVariables("SERVER_NAME")
			myMessage.To = strEmail
			myMessage.Subject = "E-mail Sample from ASP 101!"
			myMessage.Body = "Merhaba"

			myMail.Send(myMessage)

			divFormSection.Visible = False
			lblUserMessage.Text = "Your message has been sent to " & strEmail & "."
		

%>