🚀 go-pugleaf

Come puoi trovare il valore nuovo nel database, se ancora non l'hai
inserito?

sql = "update clienti set nome= '" & txtnome.Text & "' where nome = '" &
txtnome.Text & "' "

Prova in questo modo:

crea un Contatore con chiave univoca nella tabella del database, e quando
vai a caricare i dati memorizza il valore del contatore da qualche parte,
per esempio nel TAG della casella testo.

dopo esegui questo codice

Set conn = CreateObject("adodb.connection")
Set rs = CreateObject("adodb.recordset")
strconn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" & App.Path &
"\contatti.mdb"
conn.Open strconn
sql = "update clienti set nome= '" & txtnome.Text & "' where contatore = " &
cstr(txtnome.Tag) & ";"
conn.Execute sql

Ciao Federico

         \ | /
       (@ @)
--o00-(_)-00o---

http://bcp.3000.it

"sara" <sarabarberini@libero.it> ha scritto nel messaggio
news:6UZKa.125635$Ny5.3549977@twister2.libero.it...
> Ho un database clienti con i seguenti campi : NOME , COGNOME, INDIRIZZO
> ,CITTA', ho creato una form dove visualzzo in 4 textbox i suddetti campi.
> Quando provo a cambiare il  nome del cliente nella prima textbox e poi
provo
> a salvarlo non riesco a ottenere nessun risultato.Nel pulsante che ho
creato
> per attivare le modifiche , ho inserito il seguente codice (che ovviamente
�
> sbagliato).
>
> Set conn = CreateObject("adodb.connection")
> Set rs = CreateObject("adodb.recordset")
> strconn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" & App.Path &
> "\contatti.mdb"
> conn.Open strconn
> conn.Open strconn
> sql = "update clienti set nome= '" & txtnome.Text & "' where nome = '" &
> txtnome.Text & " ' "
> conn.Execute sql
>
>
> grazie come sempre per l'aiuto
>
>
>
>