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 TR = RIGHT(STR, LEN(STR)-4)

'Aggiungo '+39 ' all'inizio TR = "+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.

 

Pagina :
1 | 2 | 3 | 4