Hjælp til AspMAIL komponenten (Wannafind)

Eks på hvordan koden kan laves du skal lige rette et par linjer med modtager navn og email adress. Samt adressen på den server du sender mail igennem:


<%
if request.servervariables("REQUEST_METHOD")="POST" then
  Dim Mailer
  Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

  navn = Request.form("navn")
  fraemail = Request.form("email")
  emne = Request.form("emne")
  tekst = Request.form("tekst")

' Her sættes afsender navn og e-mail adresse
  Mailer.FromName  = navn
  Mailer.FromAddress= fraemail

' Afsenders mailserver, RET DENNE
  Mailer.RemoteHost = "mail.domain.dk"

' Her sættes modtager navn og e-mail adresse, RET DENNE
  Mailer.AddRecipient "Modtagers navn", "modtager@domain.dk"

' Her sættes overskriften på mailen
  Mailer.Subject    = emne

' Her sættes selve teksten til mailen
  Mailer.BodyText  = "Hej med dig" & VbCrLf & tekst

' Send e-mail og skriv status
  if Mailer.SendMail then
    Response.Write "Mailen er afsendt..."
  else
    Response.Write "Der skete en fejl: " & Mailer.Response
  end if
' Fjern objekt igen
  Set Mailer = Nothing
end if
%>
<html>
<body>
<form action="<%= request.servervariables("SCRIPT_NAME")%>" method="post">
<table>
<tr><td>Navn:</td><td><input type="text" name="navn"></td></tr>
<tr><td>Email:</td><td><input type="text" name="email"></td></tr>
<tr><td>Emne:</td><td><input type="text" name="emne"></td></tr>
<tr><td>Tekst:</td><td><input type="text" name="tekst"></td></tr>
<tr><td>&nbsp;</td><td><input type="submit" name="Send" value="Send"></td></tr>
</table>
<form>
</body>
</html>

Der må have sneget sig en lille fejl ind, for der kommer til at stå " method="post"> ovenover formularen.

Har du kaldt filen for .asp til efternavn?

Ja og der er heller ikke noget når den kommer op på et rigtigt webhotel, kun på min egen maskine kommer denne "fejl"

Det virker perfekt, tak for det.
Et lille tillægsspørgsmål. Hvis jeg skal bruge det i et design. kan scriptet så ligge inden body?

Ja det kan du godt.

Kan jeg forhindre at beskeden om at mailen er afsendt åbnes i et nyt vindue?

Som det er vist udksirver den det bare på den side som koden ligger i.
Du kan evt. fjerne linje med response.write så den ikke udskriver noget.

Takker

.

.