alternativa alla funzione left

[aux998]

Ciao,
c'è una alternativa alla funzione left ?
il mio problema è che se faccio ad esempio left(rs("news"),130), quel record potrebbe contenere formattazione ed incasinarmi tutto perchè viene troncato il record che magari contiene codice etc...
...mi domandavo se semplicemente c'era la possibilità di "nascondere", invece di spezzare, una parte di news, in modo da avere in html comunque tutto il record intero, ma che ne venga solo visualizzato una parte... almeno così si dovrebbe risolvere.

[Roby_72]

Non ho capito nulla, comunque puoi usare la mid()

Roby

[barney09]

io ho capito giusto qualcosa....







LEFT ti prende i primi X caratteri partendo da sinistra, giusto? vi chiedo conferma perchè non l'ho mai usata. Uso sempre MID.

MID(testo, partenza, arrivo) ti permette di prendere della variabile testo solo i caratteri che vanno da PARTENZA ad ARRIVO.

Impostando partenza ad 1 e arrivo a 130 ottieni lo stesso risultato della tua LEFT
pero' hai la possibilità di incrementare partenza a 10 a 27, ecc. e lui partità dal 27° carattere.

[wallrider]

devi fare in modo di avere il testo puro senza codice. quindi o ti crei un campo che contiene solo il testo, o ti crei una funzione che te lo estrapola(e poi ci usi il left)

[Roby_72]

Se quello che dice wallrider è quello che vorresti puoi usare le espressioni regolari per ripulire il testo dalla formattazione HTML.

Roby

[barney09]

cosa intendi per espressioni regolari?

[optime]

Originariamente inviato da barney09
cosa intendi per espressioni regolari?

regular expressions... lo sai cosa sono

[Roby_72]

Una cosa di questo genere:

'Funzione per eliminare i tag HTML
Function deleteHTML(strHTML) 
     Dim objRegExp, strOutput 
     Set objRegExp = New Regexp 
     objRegExp.IgnoreCase = True 
     objRegExp.Global = True 
     strOutput=strHTML 
     objRegExp.Pattern = "<[^>]*>" 
     strOutput = objRegExp.Replace(strOutput, "") 
     deleteHTML = strOutput 
     set objRegExp = Nothing 
End Function

Roby

[barney09]

Originariamente inviato da optime
regular expressions... lo sai cosa sono

mai usate, mai conosciute...


e adesso frustami tutto...

[barney09]

Originariamente inviato da Roby_72
Una cosa di questo genere:

'Funzione per eliminare i tag HTML
Function deleteHTML(strHTML) 
     Dim objRegExp, strOutput 
     Set objRegExp = New Regexp 
     objRegExp.IgnoreCase = True 
     objRegExp.Global = True 
     strOutput=strHTML 
     objRegExp.Pattern = "<[^>]*>" 
     strOutput = objRegExp.Replace(strOutput, "") 
     deleteHTML = strOutput 
     set objRegExp = Nothing 
End Function

Roby

Ti ringrazio. Mi documento. Non ho mai acuto occasione di utilizzarle.