pulire stringhe

[jartuf]

Uhm...grazie, ho provato cos'ì

str = oRst("email")
str = replace(str,"<","")
str = replace(str,">","")
arr_str = split(str," ")
    

    
for xElem = 0 to Ubound(arr_str)
    
    if InStr(arr_str(xElem)), "@") > 0 Then
        response.write(trim(arr_str(xElem)) &"
")
    else
    response.write &"
")
    End if
next 

ma ho il seguente errore:

Expected 'Then'
...
if InStr(arr_str(xElem)), "@") > 0 Then