Jmail scripting
Jeg kunne godt bruge noget hjælp- Jeg har dette script til at sende mails til mig på mit site:-------
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber5">
<tr>
<td width="100%" valign="top" height="21">
<h4>Du kan sende din mail direkte fra dette site, blot ved at udfylde nedenstående felter!</h4>
</td></tr><tr>
<td valign="top">
<% mode = request("mode") %>
<% if mode = "" then %>
<form METHOD="post" ACTION="index.asp?mode=send">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber4" width="100%">
<tr>
<td valign="top" height="23" align="left">
<h4 style="margin-top: 0; margin-bottom: 0"><b>
<font face="Arial" size="2" color="#FFFFFF">
<input type="text" name="fra_navn" size="35" style="font-family: arial; border: 1px solid #336699; " value="Dit navn"></font></b></h4>
</td>
</tr>
<tr>
<td valign="top" height="29">
<h4 style="margin-top: 0; margin-bottom: 0"><b>
<font face="Arial" size="2" color="#FFFFFF">
<input type="text" name="fra_mail" size="35" style="font-family: arial; border: 1px solid #336699; " value="Din mail"></font></b></h4>
</td>
</tr>
<tr>
<td valign="top" height="29">
<h4 style="margin-top: 0; margin-bottom: 0"><b>
<font face="Arial" size="2" color="#FFFFFF">
<select size="1" name="emne" style="border: 1px solid #093EA1">
<option>Tilbud</option>
<option>ordre</option>
<option>kommentar</option>
<option>andet</option>
</select></font></b></h4>
</td>
</tr>
<tr>
<td valign="top">
<h4 style="margin-top: 0; margin-bottom: 0">
<textarea cols="35" rows="10" name="besked" style="font-family: arial; border: 1px solid #336699; ">Spørgsmål/kommentar:</textarea></h4>
</td>
</tr>
</table>
<h3 style="text-align: left; margin-top: 0; margin-bottom:0"><b>
<font face="Arial" size="2" color="#FFFFFF">
<input TYPE="submit" VALUE="Send E-mail"></font></b> </h3>
</form>
<% end if %>
<% if mode = "send" then %>
<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mailgate.jman.dk"
JMail.Sender = Request.Form("fra_mail")
JMail.Sendername = Request.Form("fra_navn")
JMail.Subject = Request.Form("emne")
JMail.AddRecipient "jman@jman.dk"
JMail.Body = Request.Form("besked")
JMail.Priority = 3
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Silent = True
If JMail.Execute then
%><h1>Tak for din Mail! <% Else %></h1>
<h2><font color="#FF0000">Mailen er desværre ikke afsendt.</font></h2>
<h4><font color="#FF0000"><span lang="da">Enten er alle felter ikke udfyldt
eller d</span>er kan være problemer med serveren - benyt evt. mailadressen under logoet til
højre.</font></h4>
<% End If %>
<% end if %>
</td></tr></table>
-------
Jeg vil gerne have gjort således at man kan vedhæfte en fil også. Er der nogen der kan "plotte" det ind i ovennævnte script?
