Ciao ragazzi,
il messaggio è un po' confuso ma spieghevole velocemente, io utilizzo questo codice per estrapolare i dati da una tabella.mdb nelle textbox tramite una List1:
Dim rst1 As Recordset, DB1 As Database
Set DB1 = OpenDatabase("C:\...\DB.mdb")
Set rst1 = DB1.OpenRecordset("SELECT * FROM DB_AZIENDE where RAGIONESOCIALE ='" & List1.Text & "'")
Do While Not rst1.EOF
txt_Nome.Text = rst1!RAGIONESOCIALE
txt_Indirizzo.Text = rst1!INDIRIZZO
txt_Citta.Text = rst1!CITTA
rst1.MoveNext
Loop
rst1.Close
DB1.Close
e fin qui tutto Ok...ma quando si trova un accento nel rst1!RAGIONESOCIALE mi va tutto in pallone, l'errore è:
Errore di run-time '3075'
Errore di sintassi nella stringa nell'espressione della query
'RAGIONESOCIALE=' -il record richiesto-
Mi sapreste aiutare, perchè io non so' assolutamente cosa sia!
Grazie, vrclaudio
Buonanotte a tutti dato che sono le 01.00 di notte...![]()
![]()
![]()