Avatar billede theselfimages Nybegynder
05. juni 2003 - 16:21 Der er 4 kommentarer og
1 løsning

Problem m. ASP mailhandler

Hvorfor virker dette ikke med IF levering="Ja" then sætningen, nederst? Det virker fint uden. Altså hvis jeg blot skriver:

Mailer.BodyText  = "Levering: " & levering

Lars


<%

Dim levering, antal, navn, adresse, post, by, email, telefon, subscribe, unsubscribe

levering = Request.Form("levering")
antal    = Request.Form("antal")
navn    = Request.Form("navn")
adresse  = Request.Form("adresse")
post    = Request.Form("post")
by      = Request.Form("by")
email    = Request.Form("email")
telefon  = Request.Form("telefon")
strandkurv = Request.Form("strandkurv")

Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

Mailer.CharSet        = 2

Mailer.FromName    = navn
Mailer.FromAddress = email

Mailer.AddRecipient "Strandkurven", "privat@theselfimages.dk"

Mailer.RemoteHost = "mail.theselfimages.dk"

Mailer.Subject    = "Strandkurv bestilling"

Mailer.BodyText  = "Navn: " & navn & vbcrlf & _
                    "Adresse: " & adresse & vbcrlf & _
                    "Postnr.: " & post & vbcrlf & _
                    "By: " & by & vbcrlf & _
                    "Email: " & email & vbcrlf & _
                    "Telefon: " & telefon & vbcrlf & vbcrlf & _
                    "Strandkurv: " & strandkurv & vbcrlf & _
                    "Antal: " & antal & vbcrlf & _

if levering="Ja" then
Mailer.BodyText  = "Levering: " & levering
else
Mailer.BodyText  = "Levering: Nej"
end if
%>
Avatar billede cesil Nybegynder
05. juni 2003 - 16:26 #1
prøv med trim(levering)
eller cstr(levering)
Avatar billede theselfimages Nybegynder
05. juni 2003 - 16:41 #2
?

Det må du lige uddybe lidt...
Avatar billede soes Nybegynder
05. juni 2003 - 18:38 #3
If trim(levering) = "ja" Then

eller

If Cstr(levering) = "ja" Then
Avatar billede theselfimages Nybegynder
06. juni 2003 - 02:32 #4
Nope... får bare en "page cannot be displayet fejl", med mindre jeg blot sætter denne: Mailer.BodyText  = "Levering: " & levering
ind alene uden nogen IF sætning... så virker det fint.

Mærkeligt at det ikke bare er lige til at integrerer en sådan simpel IF sætning!?
Avatar billede theselfimages Nybegynder
06. juni 2003 - 10:01 #5
Problemet blev løst således:

<%

Dim levering, antal, navn, adresse, post, by, email, telefon, subscribe, unsubscribe, strBody

levering = Request.Form("levering")
antal    = Request.Form("antal")
navn    = Request.Form("navn")
adresse  = Request.Form("adresse")
post    = Request.Form("post")
by      = Request.Form("by")
email    = Request.Form("email")
telefon  = Request.Form("telefon")
strandkurv = Request.Form("strandkurv")

Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

Mailer.CharSet        = 2

Mailer.FromName    = navn
Mailer.FromAddress = email

Mailer.AddRecipient "Strandkurven", "privat@theselfimages.dk"

Mailer.RemoteHost = "mail.theselfimages.dk"

Mailer.Subject    = "Strandkurv bestilling"

strBody  = "Navn: " & navn & vbcrlf & _
            "Adresse: " & adresse & vbcrlf & _
            "Postnr.: " & post & vbcrlf & _
            "By: " & by & vbcrlf & _
            "Email: " & email & vbcrlf & _
            "Telefon: " & telefon & vbcrlf & vbcrlf & _
            "Strandkurv: " & strandkurv & vbcrlf & _
            "Antal: " & antal & vbcrlf

If LCase(levering) = "Ja" Then
  strBody  = strBody & "Levering: " & levering
Else
  strBody  = strBody & "Levering: Nej"
End If

Mailer.BodyText = strBody
%>
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester