Web 2 MC

Ecco un ottima funzione in ASP che prende in input una stringa ed un’espressione regolare, e produce in output la stringa pulita da tutti i caratteri dell’espressione regolare.

function replace_string(strOriginalString, strPattern,strReplace,varIgnoreCase) 
    ' Function matches pattern, returns true or false 
    ' varIgnoreCase must be TRUE (match is case insensitive) or FALSE (match is case sensitive) 
    dim objRegExp : set objRegExp = new RegExp 
        with objRegExp 
        .Pattern = strPattern   
        .IgnoreCase = varIgnoreCase   
        .Global = True 
        end with 
        replace_string = objRegExp.replace(strOriginalString,strReplace)
    set objRegExp = nothing
end function

Ed ecco un esempio di chiamata per pulire una stringa da codice HTML:

descrizione=replace_string(rs("descrizione"), "<[/!]*?[^<>]*?>","", True)

Segnala presso:

Articoli correlati

• Programmare in ASP: Funzione per pulire stringa per l’SQL
• Programmare in ASP: Funzione per pulire testo da Word
• Tanti font gratuiti da scaricare
• Servizio per caricare immagini su Internet
• Scaricare un intero sito in formato pdf