PDA

View Full Version : [vb6] matrici di controlli


RaouL_BennetH
20-03-2005, 13:11
Ho un problema nell'inserimento dei dati in un db.

Questo è il codice:



Option Explicit

Enum TextBoxes

txtCognome = 0
txtNome = 1
txtAzienda = 2
txtOccupazione = 3
txtIndirizzo = 4
txtCitta = 5
txtCap = 6
txtProv = 7
txtMail = 8
txtWeb = 9
txtTelUff = 10
txtTelCasa = 11
txtTelCell = 12
txtTelFax = 13
txtnote = 14

End Enum


Dim I As Integer
Dim x As TextBoxes


'sul form ci sono 15 matrici di controlli, quindi numerate da 0 a 14 come Index

'questo è il codice di inserimento nel db:

Case 2

If TextBox(0).Text = "" Then
MsgBox "Inserire almeno il Cognome!!", vbCritical

Else
insert = ""
insert = insert & "INSERT INTO tblRubrica(Cognome, Nome, Azienda, Occupazione, Indirizzo, Citta, CAP, prov, email, web, telufficio, telcasa, telcellulare, telfax, note)" & vbCrLf
insert = insert & "VALUES('" & TextBox(x).Text & "')" & vbCrLf
Set rs = cn.Execute(insert)
cn.Close
MsgBox "Dati inseriti correttamente", vbOKOnly
Toolbar1.Buttons.Item(2).Visible = False
Toolbar1.Buttons.Item(1).Visible = True

For x = txtCognome To txtnote
TextBox(x).Enabled = False
TextBox(x).Text = ""
Next x

End If


N.B.: per risparmiare spazio nel post ho messo:

insert TextBox(x).Text per non scriverle tutte

Bene, il problema che ho è che mi dice che la matrice di controllo 15 non esiste!!

Fenomeno85
20-03-2005, 14:34
guarda se non vai su text(15)

~§~ Sempre E Solo Lei ~§~

Fenomeno85
20-03-2005, 14:37
ese se hai fatto una matrice fai così:


For i = 0 To 14
code
Next


in code avrai text(i).text esempio e andrai da 0 a 14

~§~ Sempre E Solo Lei ~§~

RaouL_BennetH
20-03-2005, 19:01
Originariamente inviato da Fenomeno85
ese se hai fatto una matrice fai così:


For i = 0 To 14
code
Next


in code avrai text(i).text esempio e andrai da 0 a 14

~§~ Sempre E Solo Lei ~§~

Infatti, solo che non capisco perchè non vuole scrivermi l'ultima matrice nel db!!

La mia ultima matrice è la 14 ma sembra che non gli freghi nulla!!

RaouL_BennetH
20-03-2005, 19:18
ma dannazione!!

ma perchè accidenti se mi fermo alla matrice 13 funziona?!! grrrr!!!

se vado sulla 14 invece no.

Nel form c'è
Nel db il campo che deve ricevere il testo dalla 14 pure
Nell'istruzione sql, c'è

ma che accidenti :(

RaouL_BennetH
20-03-2005, 19:30
MA VAAAAAAAAAAAAAAAAFFFF!!!!!!!!!!!!!!!!!!!!!!!!!!!


Che errore idiota!!! che stupido che sono!!!

Il problema era che nella tabella del db, per tutti i campi non era consentita la lunghezza 0, quindi, se lasciavo un solo campo vuoto, non mi permetteva di scrivere sul db.


Ok, vado a spararmi, a dopo :)