Originariamente inviato da maxx02
Perchè se il testo nn contiene nessun link nn mostra nulla?
Potresti aprire un po gli occhi e vedere che c'è un errore (mio) nella riga in cui faccio lo split. Ho messo test invece di testo.
Copiare e incollare e bello, ma almeno che si guardi ciò che si copia e incolla...
codice:
testo = CI_Preserve((rs.Fields.Item("Messaggio").Value)) 
if inStr(testo," ") > 0 then
  elTesto = split(testo)
  for each item in elTesto
    if left(item,4) = "www." then
    response.write "" & item & " "
    elseIf left(item,7) = "http://" then
    response.write "" & item & " "
    else
    response.write item & " "
    end if
  next
else
    if left(testo,4) = "www." then
    response.write "" & testo & " "
    elseIf left(testo,7) = "http://" then
    response.write "" & testo & " "
    else
    response.write testo & " "
    end if
end if