<%@ Language=VBScript %>
<%
Response.Buffer = true

Dim myMail, mtextz, mtext01, mtext02, mtext03

mtext01 = "Name:" & Request.Form("name") & vbcrlf
mtext02 = "Email:" & Request.Form("email") & vbcrlf
mtext03 = "Comments: " & Request.Form("comments") & vbcrlf

mtextz = mtext01 & mtext02 & mtext03

Set myMail = CreateObject("CDONTS.NewMail")

if request.Form("email") = "" then
myMail.From = "No name"
else
myMail.From = request.Form("email")
end if

myMail.To = "mail@hotmail.com"
myMail.MailFormat = 1
myMail.Body = mtextz
myMail.Send
Set myMail = Nothing
Response.write "DynText=E-mail sent successfully"
%>



10ks

мисля че тук <%@ Language=VBScript %>
не трява да има <% %>
и като цяло не разбрах ква е идеята:)
(домързя ме да се задълбочавам де)

Съдържаниет е скрито
Влезте за да го видите

bi triabvalo kogato se izvika tova ASP s post metoda da prieme 3 promenlivi i da pusne mail do vavedenia adres. bi triabvalo ama neshto ne tragva. ta za tova pitam dali e kakto triabva

ми щом не тръгва значи не е както трябва

TANSTAAFL! There AiNt Such Thing As A Free Lunch

Microsoft VBScript runtime error '800a01ad'

ActiveX component can't create object: 'CDONTS.NewMail'