VB6 CheckBox Multipli

[nikeddy]

Dovrei permettere la scrematura dei dati tramite multipli di checkbox

Mattina1
Mattina2
Mattina3
Pomeriggio
Sera
Notte

per la turnazione

iturno = 0
  iturno2 = 0
iturno3 = 0
 iturno4 = 0
 iturno5 = 0
 iturno6 = 0
    If chk_m1.Value = 1 And chk_m2.Value = 1 Then 
 iturno = 1
 iturno2 = 2
     ElseIf chk_m1.Value = 1 And chk_m3.Value = 1 Then
    iturno = 1
 iturno3 = 3
    ElseIf chk_m1.Value = 1 And chk_p.Value = 1 Then
     iturno = 1
 iturno4 = 4
     ElseIf chk_m1.Value = 1 And chk_n1.Value = 1 Then
      iturno = 1
 iturno5 = 5
      ElseIf chk_m1.Value = 1 And chk_n2.Value = 1 Then
       iturno = 1
 iturno6 = 6
       ElseIf chk_m1.Value = 1 And chk_m2.Value = 1 And chk_p.Value = 1 Then
        iturno = 1
 iturno2 = 2
              iturno4 = 4
     ElseIf chk_m1.Value = 1 And chk_m2.Value = 1 And chk_m3.Value = 1 Then
       iturno = 1
 iturno2 = 2
       iturno3 = 3
     ElseIf chk_m1.Value = 1 And chk_m2.Value = 1 And chk_n1.Value = 1 Then
       iturno = 1
 iturno2 = 2
       iturno5 = 5
     ElseIf chk_m1.Value = 1 And chk_m2.Value = 1 And chk_n2.Value = 1 Then
       iturno = 1
 iturno2 = 2
  iturno6 = 6
    ElseIf chk_m1.Value = 1 And chk_m3.Value = 1 And chk_p.Value = 1 Then
       iturno = 1
       iturno3 = 3
       iturno4 = 4
    ElseIf chk_m1.Value = 1 And chk_p.Value = 1 And chk_n1.Value = 1 Then
       iturno = 1
        iturno4 = 4
 iturno5 = 5
    ElseIf chk_m1.Value = 1 And chk_m2.Value = 1 And chk_p.Value = 1 Then
       iturno = 1
 iturno2 = 2
           iturno4 = 4
    ElseIf chk_m1.Value = 1 And chk_p.Value = 1 And chk_n2.Value = 1 Then
       iturno = 1
       iturno4 = 4
 iturno6 = 6
    ElseIf chk_m1.Value = 1 And chk_n1.Value = 1 And chk_n2.Value = 1 Then
       iturno = 1
 iturno5 = 5
 iturno6 = 6
           ElseIf chk_m2.Value = 1 And chk_m3.Value = 1 Then
      iturno2 = 2
   iturno3 = 3
     ElseIf chk_m2.Value = 1 And chk_p.Value = 1 Then
  iturno2 = 2
        iturno4 = 4
   ElseIf chk_m2.Value = 1 And chk_n1.Value = 1 Then
   iturno2 = 2
 iturno5 = 5
    ElseIf chk_m2.Value = 1 And chk_n2.Value = 1 Then
   iturno2 = 2
 iturno6 = 6
    ElseIf chk_p.Value = 1 And chk_n1.Value = 1 Then
       iturno = 4
 iturno2 = 5
    ElseIf chk_p.Value = 1 And chk_n2.Value = 1 Then
  iturno4 = 4
 iturno6 = 6
    ElseIf chk_n2.Value = 1 And chk_n1.Value = 1 Then
  iturno5 = 5
 iturno6 = 6
 End If
       Set gRsturni = New ADODB.Recordset
gsSQL = "SELECT * FROM Personaleoperativointurni INNER JOIN Personale ON personaleoperativointurni.RCodPer = Personale.CodPer WHERE data BETWEEN """ & cbb_data.Text & """ AND """ & cbb_dataFINE.Text & """ OR RcodTurno = " & iturno & " or RcodTurno = " & iturno2 & " OR RcodTurno = " & iturno3 & "OR RcodTurno = " & iturno4 & "OR RcodTurno = " & iturno5 & "OR RcodTurno = " & iturno6 & ""
                gRsturni.Open gsSQL, gCnGestione
    Call Caricagriglialistacompleta

End Sub

Sbaglio e si vede.. io vorrei che se schiaccio mattina1 mattina2 e Pomeriggio o le altre possibili varianti e possibilita mi ricerchi tutti quelli che fanno il turno secondo quello che schiaccio...
Matrice di checkbox ma per l'sql?
Help Please...

[nikeddy]

spero di non dover fare 200 if

[oregon]

Mi sa che nessuno ti risponde perche' quello che vuoi fare non e' chiaro ... (anche se tu l'avrai sicuramente chiaro ...)

In particolare, non si capisce

1) a cosa vuoi arrivare

2) da quali dati parti

3) quali controlli usi

[nikeddy]

Giusto

dovrei permettere una scrematura dei dati tramite i checkbox (flag..)

Dove posso selezionare di vedere tutti i presenti del turno mattina e sera




[IMG][/IMG]

Se seleziono Mattina1 e Mattina2 mi tira fuori dal db (select Sql) i dati relativi a quei turni.

(uso db access)

E' piu chiaro cosi ? Grazie Oregon

[oregon]

Ma nell'immagine hai messo dei button ... dove sono i checkbox?

[nikeddy]

nono sono checkbox!!!

solo che in style ho cambiato in graphical per renderli piu belli

[oregon]

Ah ... ok ... allora era inutile mettere l'immagine ... era meglio spiegarla ...

Comunque, quali sono i campi del database (e i loro tipi e valori) associati ai vari checkbox?