Buono sconto 4% su Toner e Cartucce agli utenti AZpoint. SU Iomiricarico.it!!
Gestione delle Stringhe
VBScript possiede sette funzioni per la gestione delle stringhe. Le esamineremo una alla volta.
INSTR( StringaInCuiCercare, StringaDaCercare )
Restituisce la posizione in cui la stringa da cercare è presente all'interno della stringa in cui viene effettuata la ricerca.
Restituisce 0 se la stringa da cercare ha lunghezza zero o non è stata trovata, e restituisce NULL se una delle due stringhe è NULL.
Vediamo un esempio:
STR1 = "Ciao."
STR2 = "ia"
IF INSTR(STR1,STR2) > 0 THEN
RESPONSE.WRITE("STR1 contiene STR2")
ELSE
RESPONSE.WRITE("STR2 non è contenuta IN STR1")
END IF
Restituisce:
STR1 contiene STR2
INSTRREV( StringaInCuiCercare, StringaDaCercare )
Stessa cosa della funzione precedente, tranne il fatto che la ricerca inizia dalla destra della stringa.
LEFT(Stringa,NumeroDiCaratteri)
Restituisce solo i primi "NumeroDiCaratteri" caratteri della Stringa inserita, partendo da sinistra.
Vediamo un esempio:
STR="Buongiorno"
RESPONSE.WRITE("I primi 4 caratteri sono " & LEFT(STR,4))
RIGHT(Stringa,NumeroDiCaratteri)
Stessa cosa della funzione precedente, ma partendo da destra (mostra gli ultimi caratteri).
MID(Stringa, CarattereIniziale[, NumeroDiCaratteri])
Restituisce il numero di caratteri specificato partendo dal carattere iniziale specificato.
Il numero di caratteri è opzionale (è per questo che è racchiuso in una quadra).
Vediamo un esempio:
STR="Buongiorno"
RESPONSE.WRITE("Scrivo giorno :" & MID(STR,5,6))
REPLACE(Stringa, CarattereDaTrovare, SostituisciCon[, Inizio, NumeroVolte)
Cerca all'interno di una stringa una parte di stringa e la sostituisce con un'altra.
I due parametri opzionali servono per indicare il punto di inizio se esso non corrisponde all'inizio della stringa e il numero di volte in cui fare la sostituzione (se essa deve essere limitata).
Vediamo un esempio:
STR="Ciao_a_tutti"
Response.Write("Sostituisco _ con uno spazio = " & REPLACE(STR, "_", " "))
LEN(Stringa)
Restituisce la lunghezza di una stringa in caratteri.
Posso usare in maniera combinata diverse funzioni ad es. per sostituire una parte di una stringa con un'altra se contiene una particolare carattere:
STR=+3903331234567
IF MID(STR1, 4, 1) = "0" THEN
'Rimuovo i primi 4 caratteri
NEWSTR = RIGHT(STR, LEN(STR)-4)
'Aggiungo '+39 ' all'inizio
NEWSTR = "+39 " & NEWSTR
RESPONSE.WRITE("Numero=" & NEWSTR & "<BR>")
END IF
Vediamo infine due funzioni per convertire una stringa tutta in maiuscolo o minuscolo.
UCASE(Stringa)
Converte la stringa tutta in maiuscolo.
LCASE(Stringa)
Converte la stringa tutta in minuscolo.
|