Newsgroup: it.comp.lang.visual-basic
Titolo: [?]-Recuperare una stringa da una un campo

Salve a tutti sň che l'oggetto puň sembrare banale ma...
Il mio problemino č:
  Ho una Tabella con un campo chiamato strVis che contiene una stringa del
genere "Si prega di inserire i campi vuoti" & vbcrlf & "Se il problema
persiste" & space(20) & "etc..."
apro il DB, apro il Recordset
e fazzio strMsg = rsstr("strVis")
Volendola usare in un MsgBox non mi funziona, cioč non rispetta la funz.
space e il comando vbcrlf, ma mi compare la stringa cosě com'č. Sicuramente
avrete una soluzione, vi ringrazio anticipatamente
bye Roberto

Volendola usare in un MsgBox non mi funziona, cioč non rispetta la funz.
Non vedo soluzioni "facili" ...
1) Perchč nel campo deve esserci qualcosa del tipo ' persiste" &
space(20) & "etc..." ' e non direttamente il risultato ?
2) Se proprio vuoi stabilisci una convenzione: ad es _CR_ per vbCrLf,
_20_ per 20 spazi. Poi prima di passare la strimga al msgbox, fai le
opportune sostituzioni
ErreBi

Ciao,
se crei un form con un button e un textbox con la proprieta' multiline
impostata a true, dopo di che' inserisci del testo nel textbox con spazi e
ritorni a capo e nel button inserisci msgbox text1, vedi che il testo
visualizzato mantiene la formattazione che tu hai dato nel textbox..
Quindi il problema lo hai o nella formattazione del testo nel database (e lo
verifichi inserendolo all'interno della stessa textbox, o hai omesso di dire
qualcosa o ... come al solito non ho capito nulla :o((
beppe
-----------------------------------------------------------
Togliere <.antispam> dall'indirizzo
-----------------------------------------------------------
E-mail : 
mg.an...@comune.cento.fe.it
-----------------------------------------------------------
Visita il sito del WWF AltoFerrarese
http://comune.cento.fe.it/wwfaf
-----------------------------------------------------------

 wrote in message
sm1pns8uugpplioes...@4ax.com...


 wrote in message
8ljdd8$ofi$1...@fe2.cs.interbusiness.it...


Griglia di tipo FlexGrid, tutto ok tranne la proprietà FormatString che
Non credo di aver usato la FlexGrid, perchè di solito uso VsFlexGrid
della VideoSoft. Però se la proprietà FormatString è di tipo stringa,
non credo ci sia problemi a metterla in un campo e ad assegnarla
all'oggetto, una volta letta dalla tabella.
ErreBi

 wrote in message
r90rnsgld8fimicm3...@4ax.com...


Grazie, fammi sapere se hai una soluzione
Non credo sia possibile, a meno che con una funzione costruita ad hoc
vai carcare nella stringa ottenita del campo tutthli gli "space(" e li
converti in spazi ... ma mi pare un po' compesso.
ErreBi

 Volendola usare in un MsgBox non mi funziona, cioč non
rispetta la funz. space e il comando vbcrlf, ma mi compare la
stringa cosě com'č.
Non ho capito. Nel campo hai:
"Si prega di inserire i campi vuoti" & vbcrlf & "Se il
problema persiste" & space(20) & "etc..."
oppure
Si prega di inserire i campi vuoti
Se il problema persiste____________________etc...
(ho evidenziato gli spazi col carattere "_")?
Nel primo caso potresti usare la funzione eval di vbscript.
Piu` o meno cosi`:
    Dim scr
    Dim rst As DAO.Recordset
    Set scr = CreateObject("MSScriptControl.Scriptcontrol")
    Let scr.Language = "VBScript"
    Set rst = <...>
    With rst
      With .Fields
        Call MsgBox(scr.Eval(.Item("strVis")))
      End With
      Call .Close
    End With: Set rst = Nothing
    Set scr = Nothing
Nel secondo verifica che quello che e` scritto nel campo
corrisponda a quello che ti aspetti... XEs.: sei andato a capo
con ctrl+invio?
--
Ciao.
Maurizio
--------
?SPQR(C)
 X