5 svar · 179 visningar · startad av pellsäter
Varför funkar inte följande script??
Det är så att jag för att det ska funka måste skicka antingen till eller från en adress som heter *@amts.nu.
Jag vet att servern heter mail.amts.nu
Tacksam för hjälp
Bengt
<%
uppg = "Någon har velat tipsa dig om Alingsås Musikteatersällkskaps hemsida." & vbCrLf
uppg = uppg & "Här kan du läsa om alla de musikaler vi satt upp sedan 1994." & vbCrLf & vbCrLf
uppg = uppg & request.form("meddelande") & vbCrLf
uppg = uppg & "Klicka på länken för att komma dit." & vbCrLf
uppg = uppg & request.form("lank")
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.amts.nu"
JMail.Sender = request.form("franepost")
JMail.Subject = "Kolla in Alingås Musikteatersällskaps hemsida!"
JMail.AddRecipient request.form("tillepost")
JMail.Body = uppg
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Execute
%>
mailservern måste nog tillåta relaying för att du skall få skicka mail utanför domänen. det bör alltså vara en inställning i mailserverprogramvaran.
mvh,
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
if i'm not back in five minutes, just wait longer.</A>
Relaying tror jag inte att man ska sätta sin mailserver till att göra.
Det är genom dessa mail-servrar som tillåter relaying som alla spammare använder sig av.
Det du kan göra är att skapa en speciell email-adress, tex: tips@amts.nu, som du sätter som sender.
Skicka sedan med den mail-adress som tipsaren har i själva bodyn.
cya,
------------------
Private Function OutPut(ByRef sString)
OutPut = "Who gives ..." & sString
End Function
Så det finns inget fel i filen då??
Det är ju lite trist att sätta en av våra egna adresser som avsändare. Men visst det funkar ju då.
OM nån kommer på nåt så är det välkommet
BP
Finns nog ingen annan lösning då du måste "öppna" servern till att Relaya mail utanför domänen och på såvis kan vilken spammare som helst använda sig av den när de skickar ut sina spam.
Så, tyvärr ....
cya,
------------------
Private Function OutPut(ByRef sString)
OutPut = "Who gives ..." & sString
End Function
För att skicka mail med en annan adress så måste du antagligen ange din SMTP server istället.
Hos Digikom anger man smtp.digikom.net tex.
------------------
MvH
/Bengan
www.bengan.com
"Better to be hated for who you are than loved for who you're not."
