Funzione per creare radiobutton

[Grinder]

Per creare i radiobutton della mia pagina uso questa funzione di mia creazione:

function checked()
dim selezionato, non_selezionato, rs_prezzo_barra, diff2

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

diff2 = rs_componente("prezzo_art")-rs_prezzo_barra("prezzo_art")

selezionato = "<input id="""&replace(diff2, ",",".")&""" 
prezzo="""&rs_componente("prezzo_art")&""" 
disabled=""disabled"" style=""margin-right:8px;"" 
name=""INP_"&rs("cat_comp")&""" 
onfocus=""setta_vecchio_valore(this.name);comp_originale_"&rs("cat_comp")&"(this.name,
 "&rs_componente("prezzo_art")&");"" 
onclick=""verifica_radio(this.name); 
scrivivalore_"&rs("cat_comp")&"("&indice&", this.name);"" 
value="""&rs_componente("cod_art")&""" checked=""checked""
 type=""radio"">"
non_selezionato = "<input id="""&replace(diff2, ",",".")&"""
 prezzo="""&rs_componente("prezzo_art")&""" 
style=""margin-right:8px;"" name=""INP_"&rs("cat_comp")&""" 
onfocus=""setta_vecchio_valore(this.name);comp_originale_"&rs("cat_comp")&"(this.name,
 "&rs_componente("prezzo_art")&");"" 
onclick=""verifica_radio(this.name); 
scrivivalore_"&rs("cat_comp")&"("&indice&", this.name);"" 
value="""&rs_componente("cod_art")&""" type=""radio"">"

if rs_componente("cod_art") = rs("comp_base") then
response.write selezionato
else
response.write non_selezionato
end if

end function

In pratica recupero dei codici da una tabella di configurazioni nel database e li confronto con una tabella di componenti singoli e a seconda che siano componenti base o variabili il radio sarà pre-selezionato o deselezionato. Purtroppo la limitazione di questo sistema è che se il codice componente presente nella configurazione ha un codice che non è presente anche nella tabella dei componenti singoli il radio non viene mostrato affatto! Come posso ovviare (non badate alla stringa del radio, sono andato a capo così si vedeva meglio nella pagina)?

[Grinder]

[Grinder]

Nessun suggerimento?

[santino83]

ma ci sono 3/4 recordset in questa funzione....qual'è quello che non si carica?

poi che vuol dire response.write non_selezionato? non_selezionato mica la riempi.

cmq devi mettere un if

if not rs_che_non_si_carica=eof then

selezionato="<input

.......................

........................
if rs_componente("cod_art") = rs("comp_base") then
response.write selezionato
else
response.write non_selezionato
end if

else

response.write un input vuoto

end if

[Grinder]

A dare problemi credo sia la differenza di prezzi, perchè si viene a formare una differenza con il nulla. Ho provato a mettere così:

prezzo_base = rs_prezzo_barra("prezzo_art")
if rs_prezzo_barra.eof then
prezzo_base = 0
end if

diff2 = rs_componente("prezzo_art")-prezzo_base

ma non la considera

[santino83]

prezzo_base = rs_prezzo_barra("prezzo_art")
if rs_prezzo_barra.eof then
prezzo_base = 0
else

diff2 = rs_componente("prezzo_art")-prezzo_base
end if