---
title: "JMail funktion"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13601-jmail-funktion"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Webbie"
published: "2002-01-06T19:46:00.000Z"
updated: "2002-01-06T22:30:00.000Z"
replies: 1
views: 182
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/13601-jmail-funktion"
---

# JMail funktion

## #1 — Webbie, 2002-01-06T19:46Z

Kan någon ge ett fullständigt kontaktformulär till mig som använder sig av JMail komponenten?
Alltså där man fyller i, tills det skickas iväg och möjligtvis komma till en tacksida..?

Permalänk: https://www.webforum.nu/p/13601

## #2 — nill, 2002-01-06T22:30Z

Direkt från mitt webhotell:

Först behövs en formulär sida som skicka samlar in informationen vi vill skicka. Vi kallar sidan för CollectForm.asp.
 
\<html\>
\<head\>
\<title\>Formulär sidan\</title\>
\</head\>
\<body\>
\<form method="post" action="JMailForm.asp"\>
Fyll i detta formulär och klicka på skicka-knappen. Vi kommer att besvara er så snart vi kan.
\<br\>\<br\>
Namn\<br\>
\<input type="text" size="25" name="name"\>\<br\>
E-post adress\<br\>
\<input type="text" size="25" name="email"\>\<br\> 
Mottagarens E-post adress\<br\>
\<input type="text" size="25" name="recipient"\>\<br\> 
Uppge ert ärende\<br\>
\<select name="subject" size="1"\>
\<option value="help"\>Hjälp
\<option value="tips"\>Tips
\<option value="other"\>Övrigt
\</select\>\<br\>
Fyll i er fråga\<br\>
\<textarea name="body" cols="40" rows="15" wrap="physical"\>\</textarea\>\<br\>
\<input type="submit" value="Skicka"\>
\</form\>
\</body\>
\</html\> 
 

Därefter behöver vi läsa in informationen som uppgavs i formuläret. Så vi skapar en sida med det ändamålet. Sidan får namnet JMailForm.asp.
 
\<%@LANGUAGE = VBSCRIPT%\> 
\<html\>
\<body\>
\<%
' Lagrar informationen i variabler
name = Request.Form("name")
senderEmail = Request.Form("email")
subject = "Angående " & Request.Form("subject")
recipient = Request.Form("recipient")
body = Request.Form("body")

' Skapar en koppling till JMail
set msg = Server.CreateOBject( "JMail.Message" )

' Ställ in logging som true så är det enklare att spåra eventuella fel
' Och ställ in silent som tru så att vi själva kan hantera felmeddelandena
msg.Logging = true
msg.silent = true

' Läser in avsändar informationen
msg.From = senderEmail
msg.FromName = name

' Notera att addReciptient är en metod och inte en
' egenskap, så vi använder inte ett lika-med (=) tecken
msg.AddRecipient recipient

' Meddelandets ämne
msg.Subject = subject

' Och texten i meddelandet
msg.body = body

' Till sist skickar vi meddelandet, med den inlagda e-post servern
if not msg.Send("mail.mindoman.se" ) then
Response.write "\<pre\>" & msg.log & "\</pre\>"
else
Response.write "Meddelandet skickades!"
end if 

' Och så var klara! Meddelandet ligger nu i er Inkorg om allt gick rätt till.

%\>
\</body\>
\</html\>

Permalänk: https://www.webforum.nu/p/303079

---

Tråden på webben: https://www.webforum.nu/amne/asp/13601-jmail-funktion