mailform virker ikke

du avsender jo ikke mailen...

/nute

legg til

Mailer.SendMail

helt til sist i ditt script

nej først prøver jeg at se om jeg overhovedet kan udskrive den. Det er et fragment et en masse ting jeg har prøvet, men dette script skulle udskrive tekst!

ja, jeg har dette til sidst!:

if udfyldt then
    if Mailer.SendMail then
      Response.Write \"<p>Dit password er send til dig. Check din mail!</p>\"
    else
      Response.Write \"<p>Dit password blev<b> ikke</b> send</p>\"
      Response.Write \"<p>Mail-fejl. Fejlen var: <b>\" & Mailer.Response & \"</b></p>\"
    end if
else
      Response.Write \"<p>Dit password var <b>IKKE</b> Send</p>\"
      Response.Write \"<p>Felterne var ikke udfyldt!</p>\"
end if

når jeg Mailer.SendMail og ikke response.writer skriver den:

Dit password var IKKE Send
Felterne var ikke udfyldt!

derfor har jeg forsøgt at lede efter hvad der ikke skulle være udfyldt!

HELE SCRIPTET:
(det lader til at i \'for each e in Request.Form\' er form altid tom???? kan jeg ikke tjekke dette på en smart måde? jeg mener om der kommer noget med POST)

<%@LANGUAGE=\"VBSCRIPT\"%>
<meta http-equiv=\"refresh\" content=\"3;URL=http://www.domain/login.asp\">
<%
Set Mailer = Server.CreateObject(\"SMTPsvg.Mailer\")
Mailer.charset = 2
Mailer.ContentType = \"text/html\"
Mailer.FromName  = \"Mail fra webgalleri\"
Mailer.FromAddress= \"info@domain\"
Mailer.RemoteHost = \"mail.domain\"
Mailer.AddRecipient Request.Form(\"navn\"), Request.Form(\"email\")
Mailer.Subject    = \"Ny bruger - webgalleri\"

tekst = \"\"
linie = vbCrLf
\'linie = \"<br>\"
udfyldt = false


for each e in Request.Form
    if e <> \"Type\" and e <> \"hidden\" and e <> \"opret\" and e <> \"tilmeldt_user\" and e <> \"MM_insert\" then
    Response.Write e
        if Request.Form(e) <> \"\" then
            udfyldt = true
            tekst = tekst & e & linie & Request.Form(e) & linie & linie
        end if
    end if
next

\'Response.Write tekst

Mailer.BodyText  = \"Dit password til webgalleri er: \" & (Request.Form(\"pass\")) & \"<BR>\"& \"Dit brugernavn til webgalleri er: \" & (Request.Form(\"user\")) & \"<BR><a href=http://www.domain>http://www.domain</a>\"

if udfyldt then
    if Mailer.SendMail then
      Response.Write \"<p>Dit password er send til dig. Check din mail!</p>\"
    else
      Response.Write \"<p>Dit password blev<b> ikke</b> send</p>\"
      Response.Write \"<p>Mail-fejl. Fejlen var: <b>\" & Mailer.Response & \"</b></p>\"
    end if
else
      Response.Write \"<p>Dit password var <b>IKKE</b> Send</p>\"
      Response.Write \"<p>Felterne var ikke udfyldt!</p>\"
end if

%>

nu har jeg skrevet det hele om men stadigt intet resultat i kan prøve ved at skrive http://www.webgalleri.dk/ny_bruger2.asp:

Det nye script, jeg kan ikke finde på mere nu..... ?

<%@LANGUAGE=\"VBSCRIPT\"%>
<meta http-equiv=\"refresh\" content=\"3;URL=http://www.webgalleri.dk/login.asp\">
<%
Set Mailer = Server.CreateObject(\"SMTPsvg.Mailer\")
Mailer.charset = 2
Mailer.ContentType = \"text/html\"
Mailer.FromName  = \"Mail fra webgalleri\"
Mailer.FromAddress= \"info@webgalleri.dk\"
Mailer.RemoteHost = \"mail.webgalleri.dk\"
Mailer.AddRecipient Request.Form(\"navn\"), Request.Form(\"email\")
Mailer.Subject    = \"velkommen til webgalleri.dk\"

tekst = \"\"
linie = vbCrLf
\'linie = \"<br>\"
udfyldt = false

if Request.Form(\"navn\") <> \"\" then
tekst = tekst & \"navn\" & linie & Request.Form(\"navn\") & linie & linie
udfyldt = true
end if

if Request.Form(\"user\") <> \"\" then
tekst = tekst & \"user\" & linie & Request.Form(\"user\") & linie & linie
udfyldt = true
end if

if Request.Form(\"pass\") <> \"\" then
tekst = tekst & \"pass\" & linie & Request.Form(\"pass\") & linie & linie
udfyldt = true
end if

if Request.Form(\"email\") <> \"\" then
tekst = tekst & \"email\" & linie & Request.Form(\"email\") & linie & linie
udfyldt = true
end if

if Request.Form(\"adresse\") <> \"\" then
tekst = tekst & \"adresse\" & linie & Request.Form(\"adresse\") & linie & linie
udfyldt = true
end if

if Request.Form(\"postnr\") <> \"\" then
tekst = tekst & \"postnr\" & linie & Request.Form(\"postnr\") & linie & linie
udfyldt = true
end if

if Request.Form(\"bynavn\") <> \"\" then
tekst = tekst & \"bynavn\" & linie & Request.Form(\"bynavn\") & linie & linie
udfyldt = true
end if

if Request.Form(\"tilmeldt_user\") <> \"\" then
tekst = tekst & \"tilmedt nyhedsbrevet:\" & linie & Request.Form(\"tilmeldt_user\") & linie & linie
end if

\'Response.Write tekst

Mailer.BodyText  = \"Dit password til webgalleri er: \" & (Request.Form(\"pass\")) & \"<BR>\"& \"Dit brugernavn til webgalleri er: \" & (Request.Form(\"user\")) & \"<BR><a href=http://www.webgalleri.dk>http://www.webgalleri.dk</a>\"

if udfyldt then
    if Mailer.SendMail then
      Response.Write \"<p>Dit password er send til dig. Check din mail!</p>\"
    else
      Response.Write \"<p>Dit password blev<b> ikke</b> send</p>\"
      Response.Write \"<p>Mail-fejl. Fejlen var: <b>\" & Mailer.Response & \"</b></p>\"
    end if
else
      Response.Write \"<p>Dit password var <b>IKKE</b> Send</p>\"
      Response.Write \"<p>Felterne var ikke udfyldt!</p>\"
end if

%>

Jeg smidder mine sidste points og går i byen!
;o)

er der ingen som gidder at hjælpe?

Det er en kopi af at script jeg benytter et andet sted hvor det virker!

Hvorfor er if Mailer.SendMail ikke true?
Hvad kan jeg gøre for at debugge?