I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
deejayp
deejayp
il 30 aprile 2004 alle 19:53
117 messaggi dal 11 marzo 2002
www.djpwebmaster.it
ciao ragazzi..pensavo che fosse un problema semplice da risolvere..ma purtroppo nn è stato così!?!

Praticamente da un campo in un DB dove vi sono inseriti dei numeri separati da una , (virgola)es: 1,23,34,4,65,22,ecc..ecc..(questi si riferiscono rispettivamente ad un'immagine che raffigurante un servizio a diposizione)....
dovrei, tramite un ciclo for...next, mettere a video una tabella composta da checkbox associati ognumo con un'icona che rappresenta un servizio...
Dopodichè prendendo i dati presi dal DB (splittati precedentemente ed inseriti in un Array) vorrei che se il valore del checkbox corrispondesse al valore preso dal db venisse visualizzato come selezionato.

Ho provato a scivere il codice ma nn sò perchè nn riesco a fare ciò che vorrei..

Questo è il codice (semplificato):

ArrServizi = Split(Servizi,",")

For IServizi = 0 To 128

if IServizi > 0 then
if UBound(ArrServizi) >= IServizi then
Response.Write "<INPUT type='checkbox' class='checkbox' name='servizio' value='"& IServizi &"' checked>"
else
Response.Write "<INPUT type='checkbox' class='checkbox' name='servizio' value='"& IServizi &"'></TD>"
end if

Response.Write "<IMG src='../i_servizi/i_"& IServizi &".gif' width='24' height='25' border='0'>"
end if
next


con questo codice ottengo come risultato che i primi checkbox sono selezionati (anche se non corrispondono al medesimo valore).


Voi per caso riuscite a capire questo macchiavellico dilemma??

Spero di essermi spiegato bene!!?
RispondiQuoting
seoman
seoman
il 3 maggio 2004 alle 08:45
2.584 messaggi dal 14 maggio 2001
Se non ho capito male IServizi sono i servizi esistenti... al posto di lavorare con due array potresti fare così:

For IServizi = 0 To 128
Response.Write "<INPUT type='checkbox' class='checkbox' name='servizio' "
If Instr(rst.fields("TuoCampoNelDbConNumeriSeparatiDaVirgole"), IServizi & ",")>0 Then
Response.write " checked "
End If
Response.write ">"
next
In pratica mi chiedo se nel campo del db c'è il valore " Numero, "

Esempio
CampoDb = "1,23,34,4,65,22,"
Instr(CampoDb, "22,") è >0 perché 22 è presente nella stringa
RispondiQuoting
deejayp
deejayp
il 3 maggio 2004 alle 08:52
117 messaggi dal 11 marzo 2002
www.djpwebmaster.it
grazie Seoman per il tuo suggerimento..

ho risolto in questo modo:

Servizi = "," & Servizi & ","

For IServizi = 0 To 128

if IServizi > 0 then
  If InStr(Servizi, "," & IServizi & ",") > 0 Then
    strChecked = " checked"
else
    strChecked = ""
  End If

Response.Write "<input type='checkbox' class='checkbox' name='Servizio' value=""" & IServizi & """" & strChecked & ">&nbsp;<img src='../i_servizi/i_" & IServizi & ".gif' width='24' height='25' border='0' alt='"& Alt &"'>"




grazie cmq
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.