Hur fixar jag en mail bekräftelse?

Felmeddelande?

Inget felmeddelande. Kontaktmail.asp öppnas men inget mail skickas.

Kanske om du ändrar + till &?

Set myMail = Server.CreateObject("CDONTS.NewMail")

myMail.From = Request.Form("email")
myMail.Subject = "Från mailformuläret"
myMail.To = "info@ipanema.nu"
myMail.Body = "Namn: " & namn & VbCrLf & "Företag: " & foretag & VbCrLf & _
 "E-post: " & epost & VbCrLf & "Telefon: " & telefon & VbCrLf & "Meddelande: " & meddelande 

myMail.Send

Set myMail = Nothing

Jag hänvisar vidare till denna tråd.

En annan sak jag inte förstår är hur Request.Form() värderna från den föregående sidorna ska skickas vidare till nästa sida om du inte sparar dem Sessions eller liknande?

Jag förstår det inte heller!!
Fick koll.asp av en kompis som sade att det skulle fungera.
Har använt cdonts som me + och chr(10) tidigare och det har fungerat perfekt. Jag är novis inom ASP. Finns det något annat sätt man kan visa upp en mailbekräftelse för användaren att bekräfta?

/ Mats

Har nu provat med koden som Engine skrev och då får jag ett felmeddelande:

Teknisk information (för supportpersonal)

Feltyp:
Körningsfel i Microsoft VBScript (0x800A0046)
Åtkomst nekad.
/ASP mail/mailkontakt.asp, line 39

Webbläsare:
Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0; AIRF; T312461)

Sida:
GET /ASP mail/mailkontakt.asp

Mailkontakt.asp ser ut så här:

<%
Set newMailObj = CreateObject("CDONTS.Newmail")
newMailObj.From = "mats@ipanema.nu"
newMailObj.To = "info@ipanema.nu"
newMailObj.Subject = "Ämne"

newMailObj.BodyFormat = CdoBodyFormatText
newMailObj.MailFormat = CdoMailFormatMime    
sMailBody = "Testrad 1"& vbNewLine & vbNewLine
sMailBody = sMailBody & "Testrad 2 " & vbNewLine
newMailObj.Body = sMailBody

RAD 39 --> newMailObj.Send
Set newMailObj = Nothing
%>

koll.asp:

<%
Session("namn") = Request.Form("namn")
Session("foretag") = Request.Form("foretag")
Session("email") = Request.Form("email")
Session("telefon") = Request.Form("telefon")
Session("meddelande") = Request.Form("meddelande")
%>
Du har angett:<br><br> 
Namn: <span class="elvaf"><% = Session("namn") %></span><br> 
Företag: <span class="elvaf"><% = Session("foretag") %></span><br> 
E-post: <span class="elvaf"><% = Session("email") %></span><br> 
Telefon: <span class="elvaf"><% = Session("telefon") %></span><br> 
Meddelande: <span class="elvaf"><% = Session("meddelande") %></span> 
<br><br><br> 
Stämmer detta? <A href="kontaktmail.asp">Ja! </a> <a href="kontakt.html">Nej! </a>

kontaktmail.asp:

<% 
Set newMailObj = CreateObject("CDONTS.Newmail") 
newMailObj.From = Session("email")
newMailObj.To = "info@ipanema.nu" 
newMailObj.Subject = "Ämne" 

newMailObj.BodyFormat = CdoBodyFormatText 
newMailObj.MailFormat = CdoMailFormatMime 
newMailObj.Body = "Namn: " & Session("namn") & vbCrLf &_
"Företag: " & Session("foretag") & vbCrLf &_
"Telefon: " & Session("telefon") & vbCrLf &_
"Email: " & Session("email") & vbCrLf &_
"Meddelande: " & Session("meddelande")

newMailObj.Send 
Set newMailObj = Nothing

Session.Abandon
%>

Kanske denna koden funkar?

Tack Sebbe för att du försöker hjälpa mig men jag får ännu ett felmeddelande:
Feltyp:
Körningsfel i Microsoft VBScript (0x800A0046)
Åtkomst nekad.
/ASP mail/kontaktmail.asp, line 40

Webbläsare:
Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0; AIRF; T312461)

Sida:
GET /ASP mail/kontaktmail.asp

Är du säker på att du har tillgång till CDONTS på servern?

Visst. jag kör en egen webserver på min dator och andra ASP script fungerar.
Jag har letat på nätet efter ett annat script som gör samma sak men inte hittat nåt. Har du någon bra adress?
/ Mats

https://www.devguru.com kanske?

Åtkomst nekad...

Du kanske kan läsa lite här och se om du missat något vid installationen.

TACK!
Jag lade upp filerna på mitt webhotell och körde därifrån. Då fungerade det! Konstigt när alla andra asp filer fungerar via datorns webserver!?
En sista fråga. Hur gör jag radbrytningar i koden jag fick av Sebbe som ser ut så här:

<%
Set newMailObj = CreateObject("CDONTS.Newmail")
newMailObj.From = "mats@ipanema.nu"
newMailObj.To = "info@ipanema.nu"
newMailObj.Subject = "Ämne"

newMailObj.BodyFormat = CdoBodyFormatText
newMailObj.MailFormat = CdoMailFormatMime
newMailObj.Body = "Namn: " & Session("namn") & vbCrLf &_
"Företag: " & Session("foretag") & vbCrLf &_
"Email: " & Session("email") & vbCrLf &_
"Telefon: " & Session("telefon") & vbCrLf &_
"Meddelande: " & Session("meddelande")

newMailObj.Send
Set newMailObj = Nothing

Session.Abandon
%>

Tack alla som hjälpt mig idag.

/ Mats

Vaddå, funkar inte vbCrLf radbrytningarna? Testa att byta ut alla vbCrLf mot vbNewLine :)

vbCrLf är radbrytning.

newMailObj.Body = "Namn: " & Session("namn") & [b]vbCrLf[/b] &_

mvh,

@nders, var det inte det jag hade skrivit innan? :q

r/ Helt klart en sölig dator. (Men den fungerar nästa i alla fall...)

Sebbe, det är svårt att veta vad andra skriver samtidigt som man själv skriver svar, eller? Det jag menade var i stort sett samma som du. Eftersom ipanema är novis så valde jag att markera det som redan fanns i koden han använde som skapar radbrytningar.