Newsgroup: it.comp.appl.access
Titolo: scrivere più di 256 caratteri dentro una text box da codice

Salve a tutti
mi imbatto per la prima volta in questo tipo di problema
FE:Access Xp file adp
BE:MSDE 2000
il seguente codice:
Private Sub CasellaCombinata113_AfterUpdate()
Dim cnn As New ADODB.Connection
Set cnn = CurrentProject.Connection
Dim art As New ADODB.Recordset
art.Open "select * from finiti where codpf='" & Me.CasellaCombinata113 & 
"'", cnn, adOpenKeyset, adLockOptimistic
Me.Descrizione = art.Fields("articolo")
art.Close
Set art = Nothing
cnn.Close
Set cnn = Nothing
End Sub
dovrebbe caricarmi in una textbox il contenuto del campo "articolo" 
della tabella "finiti"
Il campo articolo è un nvarchar(4000)
La textbox "descrizione" a sua volta poggia su un campo "descrizione" di 
4000 caratteri
la cosa curiosa è che se il valore del campo "articolo" è maggiore di 
256 caratteri mi vengono copiati solamente quelli successivi
esempio se in articolo ho la seguente voce:
"Proseguimento della trivellazione meccanica del terreno fino ad una 
profondità totale PRESUNTA di 240 metri. La colonna di proseguimento, 
verrà rivestita con tubi in acciaio zincato trafilato del Ø90 mm e sarà 
la differenza tra la profondità totale - avampozzo di mt.30;PER 
DIFFERENZA RIMANGONO PRESUNTI"
nella textbox mi viene copiato solamente:
"ozzo di mt.30;PER DIFFERENZA RIMANGONO PRESUNTI""
fermando l'eseguzione a questa riga:
Me.Descrizione = art.Fields("articolo")
e facendo un
?art.Fields("articolo")
ottengo la stringa per intero.
se faccio un control+c e un control+v del testo direttamente nella 
casella, il testo viene visualizzato correttamente
Qualche idea?
Grazie
BFS


nessun allineamento a destra...ï¿œ una banalissima text box che contiene 
effettivamente solo quella parte del testo.
ciao
BFS

 BFS
ScrollBar e Repaint?
Se l'unicode non è proprio necessario prova ad eludero
Ciao


non centrano...
la cosa strana è che blocco il codice vba qui:
Me.Descrizione = art.Fields("articolo")
e interrogo il contenuto di
?art.Fields("articolo")
vedo tutta la stringa completa
avrebbe cmq più senso una limitazione ai primi 256 caratteri...non a 
quelli successivi
mistero!
BFS


Allora workaround Me.Descrizione = Trim(art.Fields("articolo") & ' ') ?


nulla da fare
ciao
BFS


Devo pensare allora che c'è qualche chr(10) o chr(13) da qualche parte. 
Prova un replace


L'avevo pensato pure io...ma anche caricando una nuova stringa di 300 
caratteri il risultato è lo stesso.
se tu lavori con msde e adp puoi farmi un test, riproducendo la mia 
situazione? tanto per capire se c'è qualcosa che non va nel mio access 
oppure se è un bug
la mia configurazione è:
windows 7 pro
access xp con tutti i sp
file adp
msde 2000
ciao
BFS


Mi sembra un po forzato windows sevent e msde 2000. Ne sono passate di 
generazioni.
Ti consiglierei, ma non indolore, una express.
Cmq se da debug il dato è corretto il problema è tutto di access e di 
come ha impostato le poprietà della connessione.


ho già provato a migrare a sql express...ma usando gli adp xp mi escono 
una caterba di errori anche nelle form più semplici che con msde 
funzionano alla perferzione.
Purtroppo non ho tempo in questo periodo per cimentarmi nella migrazione
Cmq ho fatto un test su un xp e il propblema si ripresenta
ciao
BFS