scriptet består af 2 dele
del 1
_____________
<title>Tip en ven om Kunstzonen.dk..!!</title>
<style type="text/css">
<!--
.style1 {
font-family: Arial, Helvetica, sans-serif;
font-weight: bold;
}
.style2 {
font-family: Arial, Helvetica, sans-serif;
font-size: x-small;
}
.style3 {
font-family: Arial, Helvetica, sans-serif;
font-size: xx-small;
}
body,td,th {
font-family: Verdana, Arial, Helvetica, sans-serif;
color: #FFFFFF;
}
body {
background-color: #000000;
}
.style6 {font-size: 18px}
-->
</style>
<form name="myForm" method="post" action="tip2.asp?mode=mail">
<div align="center">
<p class="style1"> </p>
<p class="style6">Tip en ven om Kunstzonen.dk </p>
<table width="360" border="0">
<tr>
<td><span class="style2">Din E-mail:</span></td>
<td><input name="body" type="text" value="" size="31" coll="50" /></td>
</tr>
<tr>
<td><span class="style2">Din vens E-mail:</span></td>
<td><input name="body1" type="text" value="" size="31" coll="50" /></td>
</tr>
<tr>
<td><div align="center"><img src="/images/breve.jpg" width="86" height="67" /></div></td>
<td><textarea name="body2" cols="24" rows="12" coll="50">Hej
Jeg fandt denne side på nettet, og synes det lyder rigtig spændende.
Jeg sender dette tip til dig, da jeg tror, det kunne være noget for dig.
Se mere på:
www.kunstzonen.dk</textarea></td> </tr>
</table>
</div>
<p align="center">
<input type="Submit" value=" Send tip til din ven ">
</p>
</form>
<p align="center" class="style3"> </p>
del 2
------------
<title>Tip en ven om Kunstzonen.dk..!!</title>
<style type="text/css">
<!--
body,td,th {
font-family: Verdana, Arial, Helvetica, sans-serif;
color: #FFFFFF;
}
body {
background-color: #000000;
}
.style1 {
font-size: 14px;
font-weight: bold;
}
-->
</style><center><%
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = Request.Form("body")
Mailer.FromAddress = Request.Form("body")
Mailer.RemoteHost = "mail.kunstzonen.dk"
Mailer.AddRecipient Request.Form("body1"), Request.Form("body1")
Mailer.Subject = "Se her..!! Et rigtig godt tip..!!"
Mailer.BodyText = Request.Form("body2")
if Mailer.SendMail then
Response.Write ""
else
Response.Write "Din ven er nu blevet tippet om Kunstzonen.dk" & Mailer.Response
end if
%></center>
<center>
<p> </p>
<p>
<center>
<p class="style1">Din ven er nu blevet tippet om Kunstzonen.dk</p>
<p class="style1">
</p>
</center>
<p>
<input type="button" value="Luk vinduet" onclick="self.close()">
</p>
<center>
<h1> </h1>
</center>
</center>