🚀 go-pugleaf

Forse un p� in ritardo ma:

Aricerca � un valore integer o long..presumo.. ora, a che ti serve questo:

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

Basta la prima riga e i valori sono uguali...

Poi, hai fatto un errore sulla stringa SQL.. da questa:

rs.Open "SELECT * FROM EE WHERE Cognome  =  aricerca ", cn, 1      'qui mi


Diventa:

rs.Open "SELECT * FROM EE WHERE Cognome  ="&   aricerca, cn, 1      'qui mi

� chiaro che, il campo Cognome deve essere di tipo Numeric e no Text... 
altrimenti hai fatto mooolti pi� erorri...

a presto..

Ciao ciao..





Il 16/03/2011 10.04, Pepe ha scritto:
> 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
>
>
>