Fejl efterlyses - JMail sender ikke mails
Jeg har lavet en anbefal-side, og det har virket hidtil. Pludselig virker det ikke, jeg har gennemtrawlet dokumentet, men kan ikke se, at der hverken er fejl eller uforklarlige ændringer:<%
Response.Buffer = True
If Request.Form("mod_mail")>"" Then
mod_navn = Request.Form("mod_navn")
mod_mail = Request.Form("mod_mail")
dit_navn = Request.Form("dit_navn")
greeting = Request.Form("greeting")
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "smtp.MyDomain.dk"
JMail.sender = "MyName@MyDomain"
JMail.subject = "Emne her"
JMail.AddRecipient mod_mail
JMail.AddRecipientBCC "MyName@MyDomain.dk"
If Request.Form("dit_navn") > "" Then
JMail.Body = "Hej " & mod_navn & "!" & vbCrLf & vbCrLf
JMail.Body = JMail.Body + "......." & vbCrLf & vbCrLf
...............
Else
JMail.Body = JMail.Body + "Hej " & mod_navn & "!" & vbCrLf & vbCrLf
JMail.Body = JMail.Body + greeting & vbCrLf & vbCrLf & vbCrLf
JMail.Body = JMail.Body + "Med venlig hilsen" & Chr(13)& Chr(10) & Chr(13)& Chr(10) & dit_navn
End If
JMail.Priority = 3
JMail.Execute
Response.Redirect("ty.asp?email="&mod_mail)
Else
%>
.......
<form name="frmReccomend" action="ty.asp" method="post">
<table border="0" cellpadding="0" cellspacing="0" class="full text11">
<tr>
<td align="left" colspan="2" class="headlinepadding headline full" style="padding-bottom: 20px;">Anbefal include.dk</td>
</tr>
<tr>
<td align="left" colspan="2" style="padding-bottom: 20px;" class="full"><b>Kender du en person, som du mener kan få glæde af include.dk, så send din anbefaling:</b></td>
</tr>
<tr>
<td align="left" style="padding: 3px 0px; width: 20%;">Modtagers navn:</td>
<td align="left" style="padding: 3px 0px; width: 80%;"><input type="text" tabindex="1" name="mod_navn" style="width: 208px;" class="input1"></td>
</tr>
<tr>
<td align="left" style="padding: 3px 0px; width: 20%;">Modtagers e-mail:</td>
<td align="left" style="padding: 3px 0px; width: 80%;"><input type="text" tabindex="2" name="mod_mail" style="width: 208px;" class="input1"></td>
</tr>
<tr>
<td align="left" style="padding: 3px 0px; width: 20%;">Dit eget navn:</td>
<td align="left" style="padding: 3px 0px; width: 80%;"><input type="text" tabindex="3" name="dit_navn" style="width: 208px;" class="input1"></span></td>
</tr>
<tr>
<td align="left" valign="top" style="padding: 3px 0px; width: 20%;">Evt. en hilsen:</td>
<td align="left" style="padding: 3px 0px; width: 80%;"><textarea tabindex="4" name="greeting" rows="<%=TXTrows%>" cols="<%=TXTcols%>" class="input1"></textarea></td>
</tr>
<tr>
<td colspan="2" align="left" style="padding: 20px 0px 3px 0px; width: 100%;"><input type="submit" tabindex="5" value="Send anbefaling" class="input2"></td>
</tr>
</table>
</form>
.......
<% End If %>
Jeg havde i formiddags bøvl med at få overført modtagers navn og e-mailadresse til ty.asp, og rodede en del med ty.asp, som bare er en side, der redirectes til. Altså ikke noget, der har med JMail-funktionen at gøre. Hvorfor afsendes der ikke mails? Jeg har en lille mistanke om, at der kan være opstået noget bøvl på serveren hos ConCor, men jeg håber du vil hjælpe med at kigge koden igennem, inden jeg brokker mig :)
