Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Vb 6 Errore

1 view
Skip to first unread message

Pepe

unread,
Mar 16, 2011, 1:36:45 AM3/16/11
to
Ciao a tutti, vi posto un pezzo di codice che mi da errore:

errore di run-time '-2147217904(80040e10)':
Nessun valore specificato per alcuni parametri necessari.

Potreste dirmi dove sbaglio? Premesso che non sono un esperto.
Ecco il codice

aricerca = Val(txtCognome1.Text)
txtCognome1.Text = aricerca

cn.Open stringa

rs.Open "SELECT * FROM EE WHERE Cognome = aricerca ", cn, 1 'qui mi
da l'errore citato sopra

While rs.EOF = False

txtData.Text = rs("Data")

txtCognome.Text = rs("Cognome")

txtNome.Text = rs("Nome")

txtTipo.Text = rs("Tipo")

txtNumDoc.Text = rs("Numero")

txtPas.Text = rs("Pas")

txtVisitato.Text = rs("Visitato")

Wend

Grazie Ciao


0 new messages