CDONTS hvordan?

Opret cdonts.asp (ikke testet) sådan her:

<%
  If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
    Dim MyBody
    Dim MyCDONTSMail

    Set MyCDONTSMail = CreateObject("CDONTS.NewMail")

    ' Retur mail
    MyCDONTSMail.From= "Mr. X"
    ' Modtager mail
    MyCDONTSMail.To= "post@dinmail.dk"
   
    ' Værdisæt emne linien
      MyCDONTSMail.Subject = "Dette er subject"

    ' Værdisæt body med input fra formularen
    MyBody = MyBody & request.form("textfelt") & vbCrLf

    ' Afsend mail
    MyCDONTSMail.Body= MyBody
    MyCDONTSMail.Send
    set MyCDONTSMail=nothing
   
    ' Videresend brugeren til denne side
    response.redirect ("tak.htm")
  end if
%>
<html>
<head>
</head>
<body>
<form method="POST" action="cdonts.asp" name="form1">
  <p><textarea rows="4" name="textfelt" cols="100"></textarea><br>
  <br>
  <input type="submit" value="Send" name="B1"><input type="reset" value="Nulstil" name="B2"></p>
</form>
</body>
</html>


//Claus

SKAL filen hedde CDONTS.asp ? (jeg har nemlig nogle problemer med at få det til at virke)

Ja, du opretter en fil som du kalder cdonts.asp hvori du kopiere hele ovenstående kode ind. Jeg har netop testet den og det virker.

Husk du skal rette post@dinmail.dk til din egen mail adresse, samt response.redirect ("tak.htm") til den side som brugeren skal videresendes til, når mailen er sendt.

//Claus

tak :F

hmm underlig smiley

Tak for point'ne, jeg formoder du har fået det til at virke?

//Claus