Avatar billede dingkee Nybegynder
10. maj 2001 - 15:26 Der er 2 kommentarer og
1 løsning

Problem med request

Hvorfor virker dette ikke:

<%

if request(\"mode\") = \"send\" then

body=Request(\"Tekst\")
  \'Alder  = request.querystring(\"alder\")
  \'Koen  = request.querystring(\"koen\")
  Alder  = request.querystring(\"alder\")
  Koen  = request.querystring(\"koen\")
  Postnummer = request.querystring(\"postnummer\")
  \'Postnummer = request.querystring(\"postnummer\")
    SQL = \"SELECT * from mailingliste where confirm=True\"
If Alder <> \"\" THEN
  SQL = SQL & \" and Alder = \'\" & request.querystring(\"Alder\") & \"\'\"
end if
If Koen <> \"\" THEN
  SQL = SQL & \" and Koen = \'\" & request.querystring(\"Koen\") & \"\'\"
end if
If Postnummer <> \"\" THEN
  SQL = SQL & \" and Postnummer = \'\" & request.querystring(\"Postnummer\") & \"\'\"
end if
\'on error resume next
Dim Telefon, sendt
    set send = conn.execute( SQL )
    if (send.BOF Or send.EOF) then
Response.write \"<center><font face=\'Verdana\' size=\'2\' color=\'000000\'>Ingen email-adresser er tilmeldt indtil videre!</h2>\"
end if
Response.write\"<tr><td><center>\"


do while not send.eof
    on error resume next
ID2= send(\"ID2\")
Telefon= Send(\"Telefon\")
Operat= Send(\"Operat\")
sendt = Send(\"sendt\")
subject= Request(\"subject\")
       
            BodyTextto = \"Hej \" & Navn & vbCrLf & vbCrLf & body

    %>
Avatar billede erikjacobsen Ekspert
10. maj 2001 - 15:30 #1
Jeg formoder du har forbundet dig til din database. Er alder et tal i databasen
skal du

SQL = SQL & \" and Alder = \" & request.querystring(\"Alder\")

og det samme hvis postnummer er et tal. Hvad sker der?
Avatar billede ricardo Nybegynder
10. maj 2001 - 19:33 #2
Du skal huske at bruge

loop

når du siger

do while [etc...]
Avatar billede dingkee Nybegynder
10. maj 2001 - 22:44 #3
Har fundet fejlen:

Skulle være dette i stedet:
  If Alder <> \"\" THEN
    SQL = SQL & \" and Alder = \" & Alder
  end if
  If Koen <> \"\" THEN
    SQL = SQL & \" and Koen = \" & Koen
  end if
  If Postnummer <> \"\" THEN
    SQL = SQL & \" and Postnummer = \" & Postnummer
  end if
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