Visualizzazione dei risultati da 1 a 6 su 6
  1. #1

    Problema con MAIUSCOLO-minuscolo

    per evidenziare del testo all'interno di una pagina ho usato la seguente funzione:
    codice:
    <%
    Function Evidenzia(testo, parole)
     parolesplit = Split(parole, " ")
     for i = 0 to UBound(parolesplit)
      testo = Replace(testo, parolesplit(i), "<span style=""background-color: yellow;"">"& parolesplit(i) &"</span>")
     next
     Evidenzia = testo
    End Function
    %>
    Il problema è che così se gli passo ad esempio il valore "ciao" non mi evidenzia ad esempio "Ciao" o "ciAo" ecc. fa cioè distinzione fra maiuscolo e minuscolo.

    Qualche idea per risolvere questo inconveniente?

    Grazie mille!

    Quoque tu Bruto fijo de 'na mignotta?

  2. #2
    O converti tutto maiuscolo:
    codice:
    <%
    Function Evidenzia(testo, parole)
     parolesplit = Split(parole, " ")
     for i = 0 to UBound(Ucase(parolesplit)) 
      testo = Replace(testo, parolesplit(i), "<span style=""background-color: yellow;"">"& parolesplit(i) &"</span>")
     next
     Evidenzia = testo
    End Function
    %>
    Oppure tutto minuscolo:
    codice:
    <%
    Function Evidenzia(testo, parole)
     parolesplit = Split(parole, " ")
     for i = 0 to UBound(Lcase(parolesplit)) 
      testo = Replace(testo, parolesplit(i), "<span style=""background-color: yellow;"">"& parolesplit(i) &"</span>")
     next
     Evidenzia = testo
    End Function
    %>
    Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!

  3. #3
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    codice:
    <%
    Function Evidenzia(testo, parole)
     parolesplit = Split(parole, " ")
     for i = 0 to UBound(parolesplit)
      testo = Replace(lcase(testo), lcase(parolesplit(i)), "<span style=""background-color: yellow;"">"& parolesplit(i) &"</span>")
     next
     Evidenzia = testo
    End Function
    %>
    Roby

  4. #4
    Originariamente inviato da Roby_72
    codice:
    <%
    Function Evidenzia(testo, parole)
     parolesplit = Split(parole, " ")
     for i = 0 to UBound(parolesplit)
      testo = Replace(lcase(testo), lcase(parolesplit(i)), "<span style=""background-color: yellow;"">"& parolesplit(i) &"</span>")
     next
     Evidenzia = testo
    End Function
    %>
    Roby
    Testo è una variabile che contiene parecchio testo con maiuscole e minuscole.

    Quindi, facendo così mi restituisce tutto il testo minuscolo e non più formattato. Come posso fare?

    Grazie!

    Quoque tu Bruto fijo de 'na mignotta?

  5. #5
    Utente di HTML.it L'avatar di M@sE
    Registrato dal
    Oct 2001
    Messaggi
    488
    Hai risolto ho lo stesso problema?

  6. #6
    bastava fare:

    codice:
    replace(testo, parolesplit(i), "sostituzione",-1,1)
    IP-PBX management: http://www.easypbx.it

    Old account: 2126 messages
    Oldest account: 3559 messages

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.