Ejercicios resueltos

Simulador (Cuando presiona el botón "ejecutar el programa" se graban todos los cuadros de texto y se ejecuta el primero de la lista mostrando en una página el resultado.)

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

pagina1.html

pagina1.asp

<%option explicit%>
<html>
<head>
<title>problema</title>
</head>
<body>
<%
dim nom
dim temp,cant
nom=request.form("nom")
response.write("string original:" & nom & " ")
cant=len(nom)
response.write("cantidad de caracteres:" & cant & " ")
temp=ucase(nom)
response.write("convertido a mayúsculas:" & temp & " ")
temp=lcase(nom)
response.write("convertido a minúsculas:" & temp & " ")
temp=left(nom,3)
response.write("Los primeros tres caracteres:" & temp & " ")
temp=right(nom,3)
response.write("Los últimos tres caracteres:" & temp & " ")
temp=mid(nom,2,3)
response.write("A partir del segundo caracter tres caracteres:" & temp & " ")
temp=strreverse(nom)
response.write("cadena invertida:" & temp & " ")
temp=trim(nom)
response.write("cadena original suprimiendo los espacios blanco del principio y el final:" & temp & " ")
temp=ltrim(nom)
response.write("cadena original suprimiendo los espacios blanco del principio:" & temp & " ")
temp=rtrim(nom)
response.write("cadena original suprimiendo los espacios blanco del final:" & temp & " ")
temp=replace(nom," ","-")
response.write("cadena remplazando los espacios en blanco por guión:" & temp & " ")
response.write("cadena dividida por los espacios en blanco ")
dim vec,f
vec=split(nom," ")
for f=0 to ubound(vec)
 response.write("" & vec(f) & " ")
next
if instr(nom,"juan")=0 then
 response.write("No se encuentra el nombre juan en la cadena ")
else
 response.write("Si se encuentra el nombre juan en la cadena ")
end if
%>
</body>
</html>

49 - Funciones para administrar string (cadenas)

Retornar