09 17th, 2008| 
Dopo un po’ di ricerche sono riuscito a trovare come in ASP (vbscript) si possa sostituire (replace) del testo da una stringa, utilizzando le regular expression.
In coldfusion era una funzione che mi ero fatto troppo utile: rimuoveva tutto l’HTML da un testo, convertendolo in plain/text. Questo mi permetteva di creare un incipit del testo senza rischiare di fare danni strutturali all’HTML.
Nel sito somacon ho trovato la soluzione, ma l’ho convertità in Function per una maggiore elasticità e comodità di utilizzo.
Function ReplaceAllByExpression(StringToExtract, MatchPattern, ReplacementText)
Dim regEx, CurrentMatch, CurrentMatches
Set regEx = New RegExp
regEx.Pattern = MatchPattern
regEx.IgnoreCase = True
regEx.Global = True
regEx.MultiLine = True
StringToExtract = regEx.Replace(StringToExtract, ReplacementText)
Set regEx = Nothing
ReplaceAllByExpression = StringToExtract
End Function
I parametri sono semplici:
- StringToExtract: il testo da trattare
- MatchPattern: il pattern della Regular Expression
- ReplacementText: la stringa da sostituire alle sottostringhe individuate dal pattern
E le jeux sont fait!
