Ho questo form

<form action="#" name="dettaglio" method="post" style="margin-top:0px">
<%
Dim rs_dett
Set rs_dett = Server.CreateObject("ADODB.Recordset")
sql="SELECT * from categorie_prodotti where cod_categoria like '& key &'"
rs_dett.Open sql,conn
%>
<table border="0" align="center" cellpadding="4" cellspacing="1" width="520">
<tr>
<th align="left">Titolo:</th>
<td align="left" bgcolor="#FFFFFF">
<%if key <> "" then%>
<input type="text" name="titolo" value="<%=rs_dett("titolo_it")%>" maxlength="150" style="width:100%">
<%else%>
<input type="text" name="titolo" value="" maxlength="150" style="width:100%">
<%end if%>
</td>
</tr>
<tr>
<th align="left">Descrizione:</th>
<td align="left" bgcolor="#FFFFFF">
<%if key <> "" then%>
<textarea name="descrizione" cols="48" rows="12"><%=rs_dett("descrizione_it")%></textarea>
<%else%>
<textarea name="descrizione" cols="48" rows="12"></textarea>
<%end if%>
</td>
</tr>
</table>
<input type="hidden" name="key" value="<%=key%>">
<input type="hidden" name="action" value="">
</form>

Secondo voi perchè mi dà errore anche se il key esiste?

Tipo di errore:
ADODB.Field (0x80020009)
Il record corrente corrisponde all'inizio o alla fine del file oppure è stato eliminato. Per eseguire l'operazione richiesta è necessario disporre di un record corrente.