Funzione per scegliere la variabile SQL

[Grinder]

Sto cercando il modo per creare una funzione che mi cambi di volta in volta la variabile SQL senza dover fare più query separate. L'ho pensata finora così:

Set rs_componente = Server.CreateObject("ADODB.Recordset")
rs_componente.ActiveConnection = MM_remtech_STRING

function desc_componente(campo)
select case campo
  case 2
    var = rs("os")
  case 1
    var = rs("processore")
  case 3
    var = rs("memoria")
  case 4
    var = rs("s_video")
  case 5
    var = rs("hd")
  case 6
    var = rs("s_audio")
end select
end function

rs_componente.Source = "SELECT * FROM componenti WHERE cod_art = '" & var & "'"
rs_componente.Open()

e nella pagina la richiamo così:

<%desc_componente(1)
response.write rs_componente("desc_art")%>
                      
<%desc_componente(2)
response.write rs_componente("desc_art")%>

<%desc_componente(3)
response.write rs_componente("desc_art")%>

<%desc_componente(5)
response.write rs_componente("desc_art")%>

<%desc_componente(4)
response.write rs_componente("desc_art")%>

<%desc_componente(6)
response.write rs_componente("desc_art")%>

Però mi da errore come se il record fosse inesistente
Come devo fare?