Hvad går det galt.... HASTER

måske kunne du bruge det her, du skal bare skifte nogen ting:

<%
    citat = Request.QueryString(\"citat\")
    If Len(URL) = 0 Then URL = \"http://www.web-zone.dk\" \' The default URL
   
    If Len(Request.Form(\"SendersEmail\")) > 0 Then
        Dim objMail,FriendEmail,I
        sBody = \"The Page at \" & citat & \" has been recommend by \" & Request.Form(\"SendersEmail\") & vbCrLf & \" -- citataf -- \" & vbcrlf & Request.Form(\"citataf\")       
        I=0
       
        Set objMail = Server.CreateObject(\"Persits.MailSender\")
        objMail.Host = \"smtp.web-zone.dk\" \' Specify a valid SMTP server
        objMail.From = \"webmaster@web-zone.dk\" \' Specify sender\'s address
        objMail.FromName = \"web-zone.dk\" \' Specify sender\'s name
        objMail.Subject = \"Recommended Page\"
        objMail.Body = sBody

        Do While True
            FriendEmail = Request.Form(\"FriendEmail\" & I)
            If Len(FriendEmail) = 0 Then
                Exit Do
            Else
                objMail.AddAddress FriendEmail
            End If
            I=I+1
        Loop
        On Error Resume Next
        objMail.Send
        Set objMail = Nothing
        Response.write \"<H1>Thank you for spreading the word</H1>\"
        Response.write \"<a href=\"\"\" & citat & \"\"\">Click here to return to \" & URL & \"</a>\"
    Else
%>
<form method=\"POST\" action=\"tellafriend.asp?URL=<%= URL %>\">
  <p><b>Recommended URL:</b> <%= URL %></p>
  <p><b>Your Email:</b> <input type=\"text\" name=\"SendersEmail\" size=\"25\"></p>
  <p><b>Your friends emails.</b></p>
  <p>1. <input type=\"text\" name=\"FriendEmail0\" size=\"29\"><br>
  2. <input type=\"text\" name=\"FriendEmail1\" size=\"29\"><br>
  3. <input type=\"text\" name=\"FriendEmail2\" size=\"29\"><br>
  4. <input type=\"text\" name=\"FriendEmail3\" size=\"29\"><br>
  5. <input type=\"text\" name=\"FriendEmail4\" size=\"29\"><br>
  </p>
  <p><b>citataf</b></p>
  <p><textarea rows=\"6\" name=\"citataf\" cols=\"41\"></textarea></p>
  <p><input type=\"submit\" value=\"Recommend Page\"></p>
</form>
<% End If    %>

eller du kunne bruge denne her:

http://www.theaspsite.org/examples_display.asp?id=25

http://www.theaspsite.org/examples_display.asp?id=25

nemt at bruge og ændre på .o)

---> OKAY
Kan du ikke hjælpe mig lidt i stedet... der er 300 point at hænte...
Det je har problemer med er emailens BODY hvis jeg laver et TEXTAREA og har den som body så virker det fint... men nu virker det ikke hjælp mig...

Giver den ikke en mere præcis fejlbeskrivelse?
Fejl 500 er bare en \"intern server fejl\"

fejlen kunne vel ikke være

if not msg.Send(\"websmtp.domæne.dk\" ) then

har du husket at rette det til din egen smtp server?

Sen skriver sådan...
--------------------------------------------
Siden kan ikke vises
Der er problemer med den side, du prøver at åbne, og den kan ikke vises.

--------------------------------------------------------------------------------

Prøv følgende:

Åbn hjemmesiden www.bwfoto.dk, og søg efter hyperlinks, der hopper til de ønskede oplysninger.
Klik på knappen  Opdater, eller prøv igen senere.

Klik på  Søg før at søge efter oplysninger på Internettet.
Du kan også se en liste over relaterede Web-steder.




HTTP 500 - Intern serverfejl
Internet Explorer 

--->zoidberg...
Ja det har jeg det er ikke det der er fejlen...
:-)

Åh zoidberg var vist mere vågen end mig :-)
-Det domæne går i hvert fald ikke, det indeholder jo \"æ\"

Det er sgu ikke nogen særlig brugervenlig fejlmeddelelse!

Har du adgang til serveren?

--->zoidberg
hvad mener du med adgang ???

Har du selv mulighed for at ændre opsætningen?

Hvilken udgave af JMail er der installeret?

det kan også være en opsætning i din IE... noget med \"vis venlig fejlsider\"

Kan rettes under \"Internet Explorere Instillinger\" under \"Advanceret\", der er en dims der er hedder noget med \"vis venlig HTTP fejlsider\" (ved ikke helt hvad den hedder på dansk da jeg bruger en engelsk version)

nej, det skal sættes op på serveren!

---> zoidberg..
Nej jeg har ikke mulighed for at ændre i serveren
Det er et webhotel jeg har købt...
Kan ikke lige finde ud af hvilken version af Jmail det er...

hmm... det gør det hele lidt sværere!

hvor ligger din side? (webhotel)

---> zoidberg.
Hos azero.dk
http://www.azero.dk

hmm... så burde det jo godt nok være den nyeste!

prøv evt. lige med

Server.CreateObject(\"JMail.SMTPMail\")

Er alle felterne i formen udfyldt?

ja de er alle sammen udfyldt

det virker ikke

hmm... jeg er sgu snart ved at løbe tør for ideer, den kode du postede ovenfor er det den du har uploadet eller er der ændret noget?

det er den jeg har uploadet..
Lige bortset fra
if not msg.Send(\"websmtp.domæne.dk\" ) then
og
<input type=\"hidden\" size=\"25\" name=\"recipient\" value=\"min@email.dk\">

Skal lige spise :-)

Prøv lige denne her istedet:

----------------------- sendmail.asp -----------------
<%@LANGUAGE = VBSCRIPT%> <html>
<body>

<%

name        = Request.Form(\"name\")
senderEmail = Request.Form(\"email\")
subject    = Request.Form(\"subject\")
recipient  = Request.Form(\"recipient\")
body        = \"Hej Bert\" & vbCrLf & \"Jeg vil gerne bestille \" & Request.From(\"stk\") & \" CD\'er\" & vbCrLf & \"Hilsen\" & Request.From(\"firma\") & vbCrLf  & Request.From(\"name\") & vbCrLf  & Request.From(\"adr\") & vbCrLf  & Request.From(\"post\") & \"&nbsp;\" & Request.From(\"by\")

set msg = Server.CreateOBject( \"JMail.Message\" )

msg.serveraddress = \"websmtp.bwfoto.dk\"
msg.Logging = true
msg.silent = true

msg.From = senderEmail
msg.FromName = name

msg.AddRecipient recipient

msg.Subject = subject

msg.body = body

if not msg.Execute then
    Response.write \"Fejl\"
else
    Response.write \"Message sent succesfully!\"
end if


%>
</body>
</html>

Kan vi se et link til siden?

Internet explorer: funktioner: avanceret-> hak i: vis meddelser om uskadelige http-fejl!

På den måde kan du se hvilken linie der er fejl i dit script!

----> moonduck
http://www.bwfoto.dk/jmail/jmail.asp

Du har en FEjl i linie 10:

Object does not support this property or method \"From\"

Prøv at bruge:

msg.Sender = senderemail

Istedet for:

msg.From = senderEmail
msg.FromName = name

Prøv dette:

body        = \"Hej Bert\" & vbCrLf & \"Jeg vil gerne bestille \" & Request.Form(\"stk\") & \" CD\'er\" & vbCrLf & \"Hilsen\" & vbCrLf & Request.Form(\"firma\") & vbCrLf 

hmm... glem det, det ser ud til at virke!

---> ALLE
Har fået det til at virke... mange tak til alle der ville hjælpe

Hvad var problemet?

<advice geekname=\"Jakob\" geekmail=\"jta@advice.dk\"/>