Hvorfor kan jeg ikke slette en post i en database...

Hej..

Jeg har et søgescript, som jeg har fået sat op, og det køre også som det skal... sådan da..

Jeg kan oprette katagorier og links online, slette katagorier, men ikke links.. Og det fatter jeg simplethen ikke...

<%@ LANGUAGE="VBSCRIPT"%>
<%OPTION EXPLICIT%>
<%Response.Buffer = True%>
<!-- #INCLUDE FILE="config.asp" -->
<!-- #INCLUDE FILE="adovbs.inc" -->

<%
    Dim intLoop

    Set objConn = Server.CreateObject ("ADODB.Connection")
    Set objRec = Server.CreateObject ("ADODB.Recordset")
    Set objRec2 = Server.CreateObject ("ADODB.Recordset")
    Set objRec3 = Server.CreateObject ("ADODB.Recordset")
   
    objConn.Open strconnect
   
    objRec.Open "cats", objConn, adOpenDynamic, adLockPessimistic, adCmdTable
    objRec2.Open "links", objConn, adOpenStatic, adLockReadOnly, adCmdTable
    objRec3.Open "links", objConn, adOpenDynamic, adLockPessimistic, adCmdTable
   
    Dim NewCatTitle
    Dim NewCatDesc
       
    NewCatTitle = Replace(Request.Form("CurrentCatTitle"), "'", "''", 1)
    NewCatDesc = Replace(Request.Form("CurrentCatDesc"), "'", "''", 1)
    %>

<html>

<head>
<title>S&oslash;g</title>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
</head>

<%
' Display the page body.
Response.Write LSPageBody1

'Check to see if they have the password in either a cookie or form response.
If (Request.Form("Password") = LSAdminPassword) OR (Request.Cookies(""&Session.SessionID&"") = LSAdminPassword)  Then

'Update the cookie.
Response.Cookies(""&Session.SessionID&"") =  LSAdminPassword

    For intLoop = 1 to Request.Form("field").Count
        objRec3.Filter = 0
   
        objRec3.Filter = "LinkID = " & Request.Form("field")(intloop)
        objRec3.Delete
       
    Next   
   
Else
   
    If NOT Request.Form("Password") = "" Then
        Response.Write FONT1 & "<strong>Desv&aelig;rre. Forkert kodeord.</strong></font><br>"
    End If
   
End If

%>

<!--#include file="displaynavigation.asp"-->
<br><br>
<!--#include file="displaycats.asp"-->
<br>
<!--#include file="displaylinks.asp"-->

<%
'Have a quick tidy up. If only house work was this easy.
objRec.Close
objConn.Close
Set objRec = Nothing
Set objConn = Nothing
%></body></html>