9 svar · 224 visningar · startad av Hazze
Hejsan!
Nån som kan ge mig ett mycket enkelt formmailscript utan någon databas inblandad.
Besökaren fyller i ett formulär och texten skickas till min mailbox samtidigt som besökaren skickas vidare till någon sida.
Hoppas nån kan :)
............................
------------------
// Hazze
Använd Jmail.
Finns massa exempel på deras sida också.
Lycka till!
------------------
Mvh
Patrik
aka Brimba
Såhär kanske funkar:
Döp en sida till vad du vill tex maila.html och släng in följande kod.
<html>
<head>
<title>Skicka ett mail till mig</title>
</head>
<body>
<p>Skicka ett mail till mig!</p>
<form method="post" action="tack.asp">
<p>Ditt namn: <input type="text" name="namn"></p>
<p> Din epostadress:<input type="text" name="epost"></p>
<p> Ditt telefonnummer:<input type="text" name="telefon"></p>
<p>Rubrik på mailet:<input type="text" name="rubrik"></p>
<p>Ditt meddelande:
<br>
<textarea name="meddelande" rows="10"></textarea>
</p>
<p><input type="submit" name="Submit" value="Skicka mailet"></p>
</form>
</body>
</html>
Sedan gör vi en sida som heter "tack.asp" vilken skriver ut ett litet tack och skickar mailet till dig (jag har JMail, har du en annan komponent måste man anpassa scriptet lite):
<%@ LANGUAGE="VBSCRIPT" %>
<%
Skickat_av_namn = request.form("namn")
Skickat_av_epost = request.form("epost")
Telefon = request.form("telefon")
Rubrik = request.form("rubrik")
Meddelande = request.form("meddelande")
Mailbody = "Från:" & Skickat_av_namn & vbcrlf + vbcrlf
Mailbody = Mailbody + "Avsändarens epost:" & Skickat_av_epost & vbcrlf + vbcrlf
Mailbody = Mailbody + "Telefonnummer: " & telefon & vbcrlf + vbcrlf
Mailbody = Mailbody + "Rubrik: " & rubrik & vbcrlf + vbcrlf
Mailbody = Mailbody + "Meddelande:" & meddelande & vbcrlf + vbcrlf
' ## Jag har använt mig av JMail, vissa justeringar behövs
' ## om du skall använda en annan mail-komponent
Set KontaktMail = Server.CreateObject("JMail.SMTPMail")
KontaktMail.ServerAddress = "din.mailserver.se"
KontaktMail.SenderName = skickat_av_namn
KontaktMail.Sender = "din@mailadress.se"
KontaktMail.ReplyTo = skickat_av_epost
' ## Här kan du ändra mailets "subject"
KontaktMail.Subject = "Mail från hemsidan"
KontaktMail.AddRecipient "din@mailadress.se"
KontaktMail.Body = Mailbody
' ## Nedan kan du ändra prioriteten på mailet, en etta är
' ## inställningen för "högsta prioritet" en trea är normal
KontaktMail.Priority = 1
KontaktMail.Execute
%>
<html>
<head>
<title>Tack</title>
</head>
<body>
Tackar!
<br>
<br>
Ditt mail har skickats, jag kommer att svara dig så snart jag har
möjlighet!
<br>
<br>
// Hazze
</body>
</html>
Hoppas detta funkar för dig, hör av dig annars!
[Redigerat av a den 05 apr 2000]
Tack! Allt fungerar bra förutom en sak: Vad ska jag ändra denna rad till? KontaktMail.ServerAddress = "din.mailserver.se"
------------------
// Hazze
[Redigerat av Hazze den 05 apr 2000]
det är samma som du använder för att "poppa" dina mail, dvs kanske mail.sks.nu eller något sånt
Nä, det är inte den server man "poppar", utan den man "smptar".
------------------
----------------------------
Gunnar Liljas - webbutvecklare
Leon Reklambyrå AB
Norrköping
ASP/VB/Perl/PHP/Tango
Emission
FEL! Det är adressen man "SMTPar"! ;)
------------------
Svenska FF1
www.johan-skog.nu
/W*
oki, whatever
om man har ASPMail som mailkomponent, räcker det då att ändra
Set KontaktMail = Server.CreateObject("JMail.SMTPMail")
till
Set KontaktMail = Server.CreateObject("ASPMail.SMTPMail")
eller?
Nej, metoderna är specifika för de olika COM-objekten, så du får kolla dokumentationen för ASPMail (den är snarlik dock).
woodi:
Emission
FEL! Det är adressen man "SMTPar"!
Ja, precis som jag skrev....
emission - märker ord...