webForumDet fria alternativet

CDONTS problem

6 svar · 164 visningar · startad av Mekano

MekanoMedlem sedan dec. 200061 inlägg
#1

Är det någon som på rak arm kan tala om för mig vad som är fel.
Den säger att den skickat mailet, men det har den inte, det verkar som om den inte får med alla fält.
När jag spikar "Message.To" med en mailadress funkar det men inte när jag försöker plocka upp fältet med "Request.Form("email")".
Hoppas ni förstår vad jag menar ;).

<%
Dim BodyToSend, Message
If Request.Form("SendButton") <> "Send" or Request.Form("bodytext") = "" Then
%>

<html>
<head>
<title>Test</title>
</head>
<body>

<form method="POST" action="<%=Request.ServerVariables("URL")%>">
Ditt Namn:<br>
<input type="text" name="namn" size="20" maxwidth="40" maxlength="60"><br>
Email address:<br> 
<input type="text" name="email" size="20" maxwidth="40" maxlength="60"> 
<br><br>

Skriv något här:<br>
<textarea name="bodytext" cols="25" rows="4">
</textarea>
<br><br>
<input type="submit" value="Send" name="SendButton">
<input type="reset" value="Clear" name="ClearButton"> 
</form>

</body>
</html>

<%
Else
Set Message = CreateObject("CDONTS.NewMail")
Message.From = Request.Form("namn")
Message.To = Request.Form("email")
Message.Subject = "Testar"
BodyToSend = Request.Form("bodytext") & vbcrlf & _
" " & vbCRLF & _
"***Testar***"

Message.Body = BodyToSend

On Error Resume Next

Message.Send

If Err.Number = 0 Then
Response.Write "Skickat."
Else
Response.Write "Error: " & Err.Description
End If

Set Message = Nothing

End If

%>

------------------
/Mekano

EclipseMedlem sedan juli 20003 741 inlägg
#2

Problemet heter kväry och ingen normalt funtad människa kommer ihåg hur det stavas.

Request("email")

Skippa Form biten så fungerar det. (Eller???)

------------------
Life is a bitch... and then you marry one.

MekanoMedlem sedan dec. 200061 inlägg
#3

Funkar inte det heller, samma resultat.

------------------
/Mekano

BjMedlem sedan sep. 2000320 inlägg
#4

Måste man inte ha med email adress som det skickas ifrån?
Antingen:
Message.From = "din@email.com"

Eller:
<input type="text" name="your_email" size="20" maxwidth="40" maxlength="60">

Message.From = request.form("your_email")

cyprysMedlem sedan dec. 20003 105 inlägg
#5

CDONTS måste använda en emailadress att skicka ifrån.
Det du måste göra är att skicka från en validerad emailadress.

Det är svårt att låta en användare skriva in en email och skriva in den som "message.from". Man måste då ha en massa script när besökaren skriver in adressen som kollar att den uppfyller ALLA krav för en emailadress.
Fortfarande kan den dock vara påhittad.
Det säkraste är att använda en egen adress och bara inkludera den andra adressen i brevet.

------------------
MVH // Cyprys
Cyprys bakgård

Politik är som en kvinna. Man lägger ena benet åt vänster, det andra benet till höger och koncentrerar sig på centerpartiet.

MekanoMedlem sedan dec. 200061 inlägg
#6

Meningen var att jag skulla ha det till en liten "Rekommendera sida" funktion.

Jag fick det att funka om jag valde att göra så här:

..tidigare kod

Din e-post:<br>
<input type="text" name="myemail" size="20" maxwidth="40" maxlength="60"><br>
Till e-post:<br> 
<input type="text" name="toemail" size="20" maxwidth="40" maxlength="60"> 
<br>

..och

Message.From = Request.Form("myemail")
Message.To = Request.Form("toemail")

Jag använder oxå CDONTS i ett kontaktformulär, där jag plockar en massa uppgifter och där funkar det med att hämta upp något annat än en e-postadress och lägga det i "Message.From =", men då har jag som sagt spikat "Message.To =" då ser det ut så här:

Message.From = Request.Form("kontakt")
Message.To = "din@epost.se"

Lite förvirrad, men som alla nybörjare måste man börja någonstans.

------------------
/Mekano

BjMedlem sedan sep. 2000320 inlägg
#7

Ja det sista funkar men under förutsättning att de som fyller i formuläret skriver sin email adress exakt som den skall vara. Minsta fel gör att formuläret ser ut att vara skickat utan att det är det.

Genererad på 375 ms · cache AV · v20260730165559-full.f96bc7eb