Avatar billede michael_stim Ekspert
07. april 2004 - 01:04 Der er 1 løsning

Kommer aldrig ind i if-satsen.

Er der nogen der er vågne?
Kan ikke finde fejlen her, jeg kommer aldrig ind i if.

<%
set conn = server.CreateObject("ADODB.CONNECTION")
DSN = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("jourblomman.mdb")

conn.Open DSN

strSQL = "Insert into rabatten (status,name,birthday,address,zipcode,city,email) values('"& request.form("status") &"','"& request.form("fullname")&"','"& request.form("birthday")& "','"& request.form("address")& "','"& request.form("zipcode")& "','"& request.form("city")& "','"& request.form("email")& "')"
'response.write strSQL
' SQL sætning eksekveres
Conn.Execute(strSQL)

dim strnews
strnews = request.form("news")


if strnews = "Ja tack. Jag vill ha ert nyhetsbrev" then
strSQL2 = "Insert into maillist (name,address,zipcode,city,email) values('"& request.form("fullname")&"','"& request.form("address")& "','"& request.form("zipcode")& "','"& request.form("city")& "','"& request.form("email")& "')"
'response.write strSQL2
'response.write strnews
' SQL sætning eksekveres
Conn.Execute(strSQL2)
end if
response.redirect("rabatten_tack.asp?news="&strnews&"")
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
Avatar billede michael_stim Ekspert
07. april 2004 - 01:11 #1
Glem det, det fungerer pludselig. Tid til at gå i seng tror jeg :o)
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