Giữ mail không nhân được

Mình gập một vấn đề là mình không thể giữ được mail,mình đã cố gắng rất là nhiêu lần nhưng vẫn không thành công.
Đây la code của minh:
<%
Customertype=Request.Form("Customertype")
email=Request.Form("email")
phone=Request.Form("phone")
subject=Request.Form("subject")
note=Request.Form("note")

select case Customertype
case "NTL":
cFrom ="support@nhatranglive.com"
case "SGL":
cFrom ="support@saigonlive.com"
case else
cFrom="support@hanoilive.com"
end select

' MailTo = "phuc2583@gmail.com"

ChuDe = "Thong tin lien lac - "
NoiDung = "THONG TIN LIEN LAC" & VbCrLf & VbCrLf
NoiDung = NoiDung & "1. Thong tin nguoi lien lac:" & VbCrLf
NoiDung = NoiDung & "First: " & Senderfirstname & VbCrLf
NoiDung = NoiDung & "Last Name: " & SenderlastName & VbCrLf
NoiDung = NoiDung & "Email: " & SenderEmail & VbCrLf
NoiDung = NoiDung & "Phone: " & SenderPhone & VbCrLf
NoiDung = NoiDung & "Subject: " & Sendercbxsubject & VbCrLf
NoiDung = NoiDung & "Subject Name: " & Sendertxtsubject & VbCrLf
NoiDung = NoiDung & "2. Noi dung lien lac:" & VbCrLf
NoiDung = NoiDung & "Comment: " & Sendernote & VbCrLf
DIM oMail, Flds, oMailConfig
Set oMail = Server.CreateObject("CDO.Message")
Set oMailConfig = CreateObject("CDO.Configuration")
oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
oMailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
oMailConfig.Fields.Update
Set oMail.Configuration = oMailConfig
oMail.From = cFrom
oMail.To = email
oMail.Subject= ChuDe
oMail.TextBody = NoiDung
oMail.Send
Set oMail = Nothing
Set oMailConfig = Nothing

session("customertype")=customertype
session("phone")=phone
session("email")=email
session("subject")=subject
session("note")=note
%>
Chân chân thành cám ơn
Thân ái
Hoàng Phúc