If etelleranet = etellerandet Then

Prøv den her:

<%
If not cint(Request.Querystring("user")) = Session("UserID") Then
Response.Write("Du kan ikke slette denne aftale")

Else

Dim rsDel
Set rsDel = ObjConn.Execute("DELETE * FROM calendar WHERE id = " & Request.QueryString("delete") & "")

ObjConn.close
set ObjConn = nothing
Response.redirect("default.asp")
End If
%>

/Goose

Det virker. :-)

Lige et dumt spm.?
Hvad gør "Cint"?

Cint tvinger din kode til, at tolke din querystring som et tal.
Så smider jeg da lige et svar :o)

/Goose

Tak for din forklaring

Det var så lidt og tak for point

/Goose

Og som et ekstra guldkorn...

valider ALTID indhold der skal i sql forespørgsler!
Sql injections, kan du finde mere om på activedeveloper.dk

men handler stort om at undgå at folk kan skrive kode til din sql og dermed trækker indhold ud af den...

i dette tilfælde tjekker jeg om det er tal:

dim id
id = Request.QueryString("delete")
if isNumeric(id) then
  Dim rsDel
  Set rsDel = ObjConn.Execute("DELETE * FROM calendar WHERE id = " & id & "")
else
  response.write("FEJL")
end if

hvis det havde været tekst ville jeg have replacet ' med ''

dim txt
txt = Request.QueryString("delete")
if len(txt) > 0 then
  txt = replace(txt, "'", "''")
end if
Dim rs
Set rs = ObjConn.Execute("en masse sql = '" & txt & "'")