Código fuente de 'Trunca cadena 2.asp'

<html>

<head>
<title>Trunca cadenar 2 - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
</head>

<p align="center"><b><font size="3">Trunca cadena 2</font></b>
<body style="font-family: Arial; font-size: 11pt">

</p>
<p></p>
<br>
<br>
Función muy similar a &quot;Trunca cadena&quot; pero con diferente implementación<br>
<br>
Esta función permite truncar una cadena en una posición de la misma y además añadir 
otra cadena a partir de esa posición.<br>
<br>
<b>Ejemplo:</b> TruncarCadena(&quot;Astalaweb.com una comunidad sin precedentes&quot;,13,&quot; 
es una página web&quot;)<br>
<b>Resultado:</b> <%
function TruncarCadena(cadena,NumCaracteres,Agregar)
	cadena2=left(cadena,NumCaracteres)
	cadena2=cadena2 & Agregar
	TruncarCadena=cadena2
end function

response.write TruncarCadena("Astalaweb.com una comunidad sin precedentes",13," es una página web")
%>

</body></html>