Hvorfor virker dette ikke?
Jeg har en liste som tilmeldes! Hvis resultat er positivt skal det smidet i en tabel, og hvis det er negativt i an anden.Jeg gør sådan:
<%
On Error Resume Next
if request.servervariables("request_method") = "POST" then
' der er submittet..
dim conn, strConn
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath(".")+"/../db.mdb"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open strConn
omr = request.form("omr")
byg = request.form("byg")
hovedemne = request.form("hovedemne")
emne = request.form("emne")
ark = request.form("ark")
ent = request.form("ent")
tilmeldDato = request.form("tilmeldDato")
afsendDato = request.form("afsendDato")
resultat = request.form("resultat")
bemaerk = request.form("bemaerk")
if request.form("resultat") = "Konkurrence" then
strSQL = "Insert into liste3(omr,byg,emne,hovedemne,ark,ent,tilmeldDato,afsendDato,resultat,bemaerk) values('"& Replace(omr,"'","''") & "','"& Replace(byg,"'","''") & "','"& Replace(hovedemne,"'","''") & "','"& Replace(emne,"'","''") & "','"& Replace(ark,"'","''") & "','"& Replace(ent,"'","''") & "','"& Replace(tilmeldDato,"'","''") & "','"& Replace(afsendDato,"'","''") & "', '"&resultat&"' ,'"& Replace(bemaerk,"'","''") & "')"
SQLslet = "DELETE * FROM liste2afs WHERE ID=" & Request("ID")
else
strSQL = "Insert into liste2negativ(omr,byg,emne,hovedemne,ark,ent,tilmeldDato,afsendDato,resultat,bemaerk) values('"& Replace(omr,"'","''") & "','"& Replace(byg,"'","''") & "','"& Replace(hovedemne,"'","''") & "','"& Replace(emne,"'","''") & "','"& Replace(ark,"'","''") & "','"& Replace(ent,"'","''") & "','"& Replace(tilmeldDato,"'","''") & "','"& Replace(afsendDato,"'","''") & "', '"&resultat&"' ,'"& Replace(bemaerk,"'","''") & "')"
SQLslet = "DELETE * FROM liste2afs WHERE ID=" & Request("ID")
end if
Conn.Execute(strSQL)
Conn.Execute(SQLslet)
Else
Response.write("")
End If
If Err.Number <> 0 Then
Response.redirect "fejl.asp"
Else
response.redirect "tak.asp"
end if
%>
Men det virker ikke!! Den viser fejlsiden hvergang resultat er negativt.....
Kan nogen hjælpe mig?
