Ett script med CDO, hoppas att det kan vara till hjälp
Kod:
<%
If Request.Form("action") = "send" Then
Set objMail=CreateObject("CDO.Message")
objMail.Subject=Request.Form("Subject")
objMail.From=Request.Form("From")
objMail.To="Din mailadress"
objMail.TextBody=Request.Form("Text")
objMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server
objMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="mail.server.com"
'Server port
objMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25
objMail.Configuration.Fields.Update
objMail.Send
set objMail=nothing
End If
%>
<form name="contact" id="contact" method="post" action="contact.asp?action=send" onsubmit="document.contact.submit.disabled='true';">
<p>
<label for="From">E-postadress</label>
<input type="text" name="From" id="From" />
<label for="Subject">Ämne</label>
<input type="text" name="Subject" id="Subject" />
<label for="Text">Meddelande</label>
<textarea name="Text" id="Text" cols="40" rows="15"></textarea>
</p>
<p>
<input type="submit" value="Skicka" />
</p>
</form>