Estrarre solo testo da news formattata

[lapiadina]

Ciao a tutti,
come ho scritto nell'oggetto vorrei estrarre da una news, formattata ed inserita in un recordset, solo il testo senza <font> <div..> >p> etc.. quindi senza i tag html.
In sostanza vorrei creare una news abbreviata (con la funzione left) semplice di solo testo da mettere nella homepage e poi cliccando su "leggi tutto" vedo la news intera.

E' possibile?

[cavicchiandrea]

Ma in sostanza vuoi "ripulire" il dato da codice html o vuoi un "limitatore" di caratteri?

[lapiadina]

la prima che hai detto.. ripulire il dato da codice html.
Penso che basterebbe fare un Replace del codice stritto tra "<....>", come si può fare?

[cavicchiandrea]

Fai una ricerca qui sul forum, trovi sicuramente una funzione che faccia ciò

[lapiadina]

non so se sia corretto ma facendo così ho risolto:

news = Replace( rs("testo"), "<", "<!--" )
news = Replace( news, ">", "-->" )
Response.Write(news)

[cavicchiandrea]

Originariamente inviato da lapiadina
non so se sia corretto ma facendo così ho risolto:

news = Replace( rs("testo"), "<", "<!--" )
news = Replace( news, ">", "-->" )
Response.Write(news)

Secondo me meglio ripulire il codice, invece di commetarlo, (cosi avrai il codice + sporco) comunque contento tu

[lapiadina]

hai pienamente ragione... ma per il momento faccio così poi appena trovo un modo ripulisco il codice

[cavicchiandrea]

Ma... nenche 2 secondi per una ricerca
http://forum.html.it/forum/showthrea...ulire+tag+html

[lapiadina]

ho cercato un pò ma non avevo trovato nulla.. quindi per il momento pensavo di fare così.. un rimedio un pò spartano.

Se mi puoi aiutare ho un problemino con l'oggetto FSO, devo spostare un file, ecco il mio codice:

Dim fsoMyFile
Set fsoMyFile = CreateObject("Scripting.FileSystemObject")
fsoMyFile.MoveFile Server.MapPath("/public/paginavuota.asp"), Server.MapPath("/"), True
Response.Write("Pagina spostata")
set fsoMyFile = nothing

ma purtroppo restituisce questo errore:
Wrong number of arguments or invalid property assignment: 'MoveFile'

mi sembra di avere fatto bene..