Привет.
цель: после заполнения формы все данные отправляются на мыло.

<%
Dim mail As New MailMessage()

'set the addresses
mail.From = New MailAddress("me@mycompany.com")
mail.To= "my@email.ru"

'set the content
mail.Subject = "This is an email"
mail.Body = "this is the body content of the email."

'send the message
Dim smtp As New SmtpClient("127.0.0.1")
smtp.Send(mail)
%>

ошибка:
Expected end of statement

/mail.asp, line 3

Dim mail As New MailMessage()
---------^

может у кого есть скрипт написанный на АСП...???
Пробывал через Set objCDOMail = Server.CreateObject("CDONTS.NewMail") - не удается создать обьект - может хост не поддерживает...

Вот, станичка отправки:
<%
Dim objCDOSYSCon

'Create the e-mail server object
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")

'Set and update fields properties
With objCDOSYSCon
'Out going SMTP server
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.yandex.ru"
'SMTP port
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
'CDO Port
.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
'Timeout
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Fields.Update
End With

'Update the CDOSYS Configuration
Set objCDOSYSMail.Configuration = objCDOSYSCon

With objCDOSYSMail
'Who the e-mail is from
.From = "my@site.com.ua"

'Who the e-mail is sent to
.To = "for_me@erererer.ua"

'The subject of the e-mail
.Subject = "test"

'Set the e-mail body format (HTMLBody=HTML TextBody=Plain)
If blnHTML = True Then
.HTMLBody = "письмо"
Else
.TextBody = "письмо"
End If

'Send the e-mail
If NOT strOutgoingMailServer = "" Then .Send

End with
response.write "Письмо ушло!"
'Close the server mail object
Set objCDOSYSMail = Nothing

%>
НО, письмо не получаю .... в чем причина может быть???