error '80040e07' Data type mismatch in criteria expression.

jeg har ovenstående fejl, som jeg ikke kan afkode.

Det skulle være i denne linie:
    Response.Write "<tr><td bgcolor=""#CCCCCC""><font size=""1""><b><a href=""test_oversigt.asp?mode=vis&kat='" & request("kat") & rpage & "'&orderby=mname"">Film titel</a></b></font></td></tr>"

Håber der er nogen der kan hjælpe

Hilsen

Tom

**************************************************

' Paging
intPage = Request("page")
rpage = "&page=" & request("page")
If isNumeric(intPage) = False Or intPage < 1 Then
  intPage = 1
  rpage = "&page=1"
End If

orderby = request("orderby")
if request("orderby") <> "" then
orderby = request("orderby")
else
orderby = "mname"
end if

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/bmdvd.mdb")
Set kat = Conn.Execute("SELECT catdescription FROM categories WHERE categoryID=" & request("kat") & "")
katg = kat("mcategory")
Set kat = nothing
Conn.Close
Set Conn = Nothing

' Database connection
  Response.Write "<table width='500' cellspacing='1' cellpadding='3'>"

Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM movies WHERE mcategory='" & request("kat") & "' AND mshow='ja' ORDER BY " & orderby & ""
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/bmdvd.mdb")
rs.Open strSQL, strDSN, 1
    Response.Write "<tr><td width='100%' bgcolor=""#E5E5E5""><font size=""1""><b>DVD</b> » <b>" & katg & "</b></font></td></tr>"
If Not (rs.BOF Or rs.EOF) Then
    Response.Write "<tr><td bgcolor=""#CCCCCC""><font size=""1""><b><a href=""test_oversigt.asp?mode=vis&kat='" & request("kat") & rpage & "'&orderby=mname"">Film titel</a></b></font></td></tr>"
  rs.PageSize = 5
  rs.AbsolutePage = intPage
  intRecCount = rs.PageSize
  intPageCount = rs.PageCount
  Do While Not rs.EOF And intRecCount > 0

If farve=1 Then
bg="#FCFCFC"
Farve= Farve + 1
Else
bg="#E5E5E5"
farve=1
End If
**********************************************

mname er char felt
mcategory er tal felt