Tipo di errore: eccezione

[Grinder]

Cosa vuol dire???

Tipo di errore:
(0x80020009)
Eccezione.
/remtech/Gaming/configura.asp, line 58

<%
Dim modello, rs, rs_numRows, rs_componente, var

Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_remtech_STRING
rs.Source = "SELECT * FROM configurazioni WHERE modello = '"
& session("modello") & "'"
rs.Open()

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

if campo =  1 then
    var = rs("conf_01")
end if

if campo =  2 then
    var = rs("conf_02")
end if

if campo =  3 then
    var = rs("conf_03")
end if

if campo =  4 then
    var = rs("conf_04")
end if

if campo =  5 then
    var = rs("conf_05")
end if

if campo =  6 then
    var = rs("conf_06")
end if

if campo =  7 then
    var = rs("conf_07")
end if

if campo =  8 then
    var = rs("conf_08")
end if

if campo =  9 then
    var = rs("conf_09")
end if

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

end function

Set rs_prezzo = Server.CreateObject("ADODB.Recordset")
rs_prezzo.ActiveConnection = MM_remtech_STRING
rs_prezzo.Source = "SELECT * FROM componenti 
WHERE cod_art = '"&rs("conf_01")&"'"
rs_prezzo.Open()

Fino a ieri funzionava!

[optime]

perche' quel codice e' su due righe?

[Grinder]

Per farlo stare in questa pagina ed evitare lo scroll orizzontale, nel codice è su una sola

[DarioN1]

Scusa , ma l'errore a che riga è ???

Quando richiami la function ???

PS : Quella function fà paura , è un orrore ! VVoVe:

[Grinder]

Sarà anche un orrore, ma funziona...è la riga evidenziata in rosso. Richiamo la funzione così:

<%if rs("conf_01") <> "#" then
call desc_componente(1)
on error resume next
response.write checked(1)&rs_componente("desc_art")&diff_prezzo()&"
"
if rs_componente("desc_art") = "" then
response.write rs("conf_01")&"
"
end if
else
response.write ""
end if
%>

E' forse meglio fare 9 query diverse e sovracaricare il server?

[zetaweb]

Per l'errore non capisco a dire la verità... forse il campo rs("conf_01") è numerico.

Cmq per migliorare la function potresti sicuramente fare un
SELECT CASE ed eliminare tutti questi if

[Grinder]

rs("conf_01") è alfanumerico, quindi memorizzato come testo...secondo me il problema deriva tutto dalla session, perchè se a questa pagina ci arrivo dalla precedente non ho nessun problema, ma se immetto direttamente l'url mi da questo errore!

[zetaweb]

Quindi fammi capire, tu hai scritto questo post meravigliandori del fatto che se carichiquesta pagina direttamente, e non facendole fare il percorso corretto, ti da l'errore?!?!
Cercate di essere un pochino piu precisi dall'inizio...

[Grinder]

E' una cosa che ho scoperto solo dopo, non è colpa mia