Exception occurred ?

Får det här felmmedelandet:

error '80020009'
Exception occurred.

/privat/outputfile.asp, line 28

På den här koden:

sql = "select id,filnamn,kat from p_download where filnamn='" & filename &"'"
set rs = oconn.execute(sql)
if rs.eof then
filnamn = value
sql="update p_download set filnamn = '"& filnamn &"', kat ='" & kat &"' where id ='" & rs("id") &"'"
oconn.execute(sql)
response.write "Filen uppdaterad"
rs.close
set rs=nothing
else
filnamn = value
sql = "Insert into p_download (filnamn, kat, nyhet,skribent,fil)"
 sql = sql & " Values ('" & filnamn & "','" & kat & "')"
oConn.Execute(sql)
response.write "Filen upplagd<br>"
end if

rad 28 är
sql="update p_download set filnamn = '"& filnamn &"', kat ='" & kat &"' where id ='" & rs("id") &"'"

någon som vet vad som är fel

if [b] not [/b] rs.eof then
filnamn = value
sql="update p_download set filnamn = '"& filnamn &"', kat ='" & kat &"' where id ='" & rs("id") &"'"
oconn.execute(sql)

Tack.