kan nogle hjælpe med denne mail_sender.asp fejl
hej for en fejl i denne asp dokument som hedder følgende :Microsoft VBScript compilation error '800a03f6'
Expected 'End'
/mail_sender.asp, line 185
dokumentet ser så ledes ud er der nogle der an hjælpe med det:
<%
Name = Request.form("name")
SenderEmail = Request.Form("email")
Recipient = Request.form("recipient")
If Recipient = "Skriv til Stengaard" Then
Repicpient = "xxxx@xxxx.dk"
Else If Recipient = "Skriv til Josephine" Then
Repicpient = "xxxxxx@xxxx.dk"
Else
Repicpient = "xxxx@xxxxxxx.dk"
End If
subject = Request.form("subject")
message = Request.form("message")
ip = Request.ServerVariables("REMOTE_ADDR")
set msg = Server.CreateOBject( "JMail.Message" )
msg.Logging = true
msg.silent = true
msg.From = SenderEmail
msg.FromName = Name
msg.AddRecipient Recipient
msg.Subject = Subject
msg.Body = "Fra: " & recipient & vbCrLf & "Navn: " & name & vbCrLf & "email: " & senderEmail & vbCrLf & "Emne: " & subject & vbCrLf & "Besked: " & message & vbCrLf & body
'.Send skal være en mail server adresse ikke email adresse
if not msg.Send("ip-adresse") then
msg.Send("mail@xxxxxxx.dk")
Response.write "<pre>" & msg.log & "</pre>"
else
(fejlen er i denne linie det er linie 185)
Response.write "<p>Meddelelse afsendt den " & Date & " klokken " & Time & "&<br /><br /><b>Fra: </b>" & name & "<br /><br />" & "<b>Mail: </b><a href='mailto:" & Recipient & "'>" & Recipient & "</a><br /><br /><b>IP-adresse: </b>" & ip & "<br /><br />" & "<b>Emne: </b>" & subject & "<br /><br /><b>Besked: </b>" & message & "<br /><br />Din Besked er modtaget. Jeg vender tilbage så hurtigt som muligt Webmaster." & "</p>"end if
%>
