Där du skrivit SMTP server på jmail.send - raden är det nog tänkt att du ska ange adressen till en smtp-server som kan skicka mailet.
Mvh,
------------------
All your base are belong to me.
2 svar · 192 visningar · startad av ampy
Vad är det för fel på denna kod
<%
Else
Meddelande = Replace(Request.Form("Meddelande"), vbCrLf, "<br>" & vbCrLf)
Do While Not RecSet.EOF
Set jmail = Server.CreateObject("JMail.Message")
jmail.Logging = True
jmail.From = "andreazz1986@hotmail.com"
jmail.Fromname = "Webmaster"
jmail.AddRecipientBCC ""& RecSet("Email") &""
jmail.Subject = Request.Form("Subject")
jmail.Body = "Meddelande via hemsidan skickades " & Now & ""
jmail.appendHTML "<font face=verdana size=1>"
jmail.appendHTML Meddelande
jmail.appendHTML "</font>"
jmail.Send ("SMTP server")
RecSet.MoveNext
Loop
Set jmail = Nothing
End If
RecSet.Close
Conn.Close
Set RecSet = Nothing
Set Conn = Nothing
%>
Felmeddelande blir detta:
Error Type:
jmail.Message (0x8000FFFF)
The message was undeliverable. All servers failed to receive the message
/ampy/nyhetsbrev/nyhetsbrev.asp, line 314
rad 314 ser ut så här:
Set jmail = Server.CreateObject("JMail.Message")
Snälla hjälp mig.
------------------
Ampy.cjb.net
Där du skrivit SMTP server på jmail.send - raden är det nog tänkt att du ska ange adressen till en smtp-server som kan skicka mailet.
Mvh,
------------------
All your base are belong to me.