49 - Funciones para administrar string (cadenas)


VBScript cuenta con un conjunto de funciones que nos permiten procesar cadenas de caracteres, veremos un ejemplo y posterior explicación de estas funciones:

Solicitar el ingreso de un nombre y apellido. Aplicar las funciones de string sobre el mismo.

pagina1.html

<html>
<head>
<title>problema</title>
</head>
<body>
<form action="pagina1.asp" method="post">
Ingrese su nombre y apellido:
<input type="text" name="nom"><br>
<input type="submit" value="cargar"><br>
</form>
</body>
</html> 

y el archivo que procesa el string cargado por teclado.

pagina1.asp

<%option explicit%>
<html>
<head>
<title>problema</title>
</head>
<body>
<%
dim nom
dim temp,cant
nom=request.form("nom")
response.write("string original:<strong>" & nom&"</strong><br>")
cant=len(nom)
response.write("cantidad de caracteres:<strong>" & cant&"</strong><br>")
temp=ucase(nom)
response.write("convertido a mayúsculas:<strong>" & temp & "</strong><br>")
temp=lcase(nom)
response.write("convertido a minúsculas:<strong>" & temp &"</strong><br>")
temp=left(nom,3)
response.write("Los primeros tres caracteres:<strong>" & temp &"</strong><br>")
temp=right(nom,3)
response.write("Los últimos tres caracteres:<strong>" & temp &"</strong><br>")
temp=mid(nom,2,3)
response.write("A partir del segundo caracter tres caracteres:<strong>" & temp& "</strong><br>")
temp=strreverse(nom)
response.write("cadena invertida:<strong>" & temp&"</strong><br>")
temp=trim(nom)
response.write("cadena original suprimiendo los espacios blanco del principio 
             y el final:<strong>" & temp &"</strong><br>")
temp=ltrim(nom)
response.write("cadena original suprimiendo los espacios blanco del principio:
               <strong>" & temp & "</strong><br>")
temp=rtrim(nom)
response.write("cadena original suprimiendo los espacios blanco del final:<strong>" 
               & temp & "</strong><br>")
temp=replace(nom," ","-")
response.write("cadena remplazando los espacios en blanco por guión:<strong>" 
               & temp & "</strong><br>")
response.write("cadena dividida por los espacios en blanco<br>")
dim vec,f
vec=split(nom," ")
for f=0 to ubound(vec)
  response.write("<strong>" & vec(f) &"</strong><br>")
next
if instr(nom,"juan")=0 then
  response.write("No se encuentra el nombre juan en la cadena<br>")
else
  response.write("Si se encuentra el nombre juan en la cadena<br>")
end if
%>
</body>
</html>
  1. entero=len(string) Retorna la cantidad de caracteres del string (tiene en cuenta los espacios en blanco ingresados al principio y al final)
  2. string=ucase(string) Retorna un string con todos los caracteres convertidos a mayúsculas.
  3. string=lcase(string) Retorna un string con todos los caracteres convertidos a minúsculas
  4. string=left(string,entero) Retorna un substring y los extrae del principio. Tantos caracteres como indica el segundo parámetro.
  5. string=right(string,entero) Similar a la función left pero empieza a contar desde la derecha del string.
  6. string=mid(string,entero,entero) Extrae un substring a partir de una determinada posición indicada en el segundo parámetro y tantos caracteres como indica el tercero.
  7. string=strreverse(string) Retorna el string invertido.
  8. string=trim(string) Retorna un string eliminando los espacios en blanco del principio y el final.
  9. string=ltrim(string) Retorna un string eliminando los espacios en blanco de la izquierda de la cadena.
  10. string=rtrim(string) Retorna un string eliminando los espacios en blanco de la derecha de la cadena.
  11. string=replace(string,string,string) Genera un string remplazando las coincidencias del segundo parámetro con respecto al primero. Se remplaza con el string del tercer parámetro.
  12. vector=split(string,string) Genera un vector dividiendo los datos del primer parámetro según el string indicado en el siguiente parámetro. El vector que se genera comienza a numerarse en cero.
  13. integer=instr(string,string) Retorna la posición del segundo parámetro dentro del string del primer parámetro. Si no lo encuentra retorna 0.


Retornar