[VB6] Valore check box

[StLuca]

Ciao a tutti,
ho provato a fare una ricerca sul forum, ma non ho trovato la risposta...

Ho un form con diversi check box i quali risultati vengono salvati in una tabella di un db.

Il problema è che io vorrei far salvare nella tabella o "Si" o "No" e non "-1" e "1"...

Mi potreste dire come si fa?

Non mi ricordo...

Per salvare i dati nel bd utilizzo questo codice:

par(1).type = adVaChar
par(1).Size = 50
par(1).Value = chkSpecchi.CausesValidation
cmd.Parameters.Append par (1)

E' giusto?

Grazie in anticipo
StLuca

[mardok30]

Ho un form con diversi check box i quali risultati vengono salvati in una tabella di un db.

Che Db è?
Se ti interessa salvare una stringa "Si" o "No" ti serve un campo stringa nel Db, se setti il campo a Boolean ti verrà salvato come True/False, 0/-1(in Access), sarai poi tu in fase di visualizzazione a far stampare "Si" o "No".

[StLuca]

Hai ragione...uso un Db Access!
E volevo sapere come poter fare per salvare "si" o "no" nel db invece di 0 e -1!


Grazie ancora
StLuca

[oregon]

Nel db quello che salvi non e' un si o un no ... questo e' quello che vedi ...

Basta che il campo sia di tipo booleano (o simile per Access ...) ... che importanza ha salvare vero/falso, si/no, 1/0 o altro ?

[StLuca]

Volevo salvare si o no, perchè nel programmino se si visualizza la lista (ossia il Db) volevo si vedesse si o no!

Inoltre se vado a stampare il contenuto di una tabella volevo si vedesse si o no!

Se si può fare e sapresti dirmi come, ne sarei felice, ma se mi dici che non si può fare non è un problema...basta sapere!


Grazie ancora

[oregon]

Quello che fai vedere nel programma non dipende da come hai scritto l'informazione nel db.

Come visualizzi i dati nel tuo programma?

[StLuca]

Uso la tabella preimpostata di VB6 e opi ci carico i dati dentro. O ti devo dire il codice?

[oregon]

Il codice ...

[StLuca]

sql= "SELECT * FROM risultati"

poi ho una funzione riempigriglia che mi inserisce i dati nella tabella

Public sub riempigriglia (ByVal sql as string)
Dim i as integer

imposto i titoli e la larghezza dei campi, poi inserisco i dati:

Rs.open sql, Conn, adOpenKeyset, adLockOptimistic
.griglia.rows = Rs.RecordCount + 1
i = 1

Do while (Not Rs.Eof)
   .griglia.textMatrix (i, 0) = Rs!nome
   .griglia.textMatrix (i, 1) = Rs!cognome
   .griglia.textMatrix (i, 2) = Rs!corso
   "                                             "
   "                                             "
   i = i + 1
   Rs.MoveNext
Loop
End Sub

Grazie ancora

[icecube_HT]

Originariamente inviato da StLuca
Volevo salvare si o no, perchè nel programmino se si visualizza la lista (ossia il Db) volevo si vedesse si o no!

Inoltre se vado a stampare il contenuto di una tabella volevo si vedesse si o no!

Non so come chiami quel campo, ipotizziamo CampoX...(di tipo Boolean)

al posto di:
.griglia.textMatrix (i,...) = Rs!CampoX

metterai qualcosa come:
.griglia.textMatrix (i,...) = IIf(Rs!CampoX, "Sì", "No")