Corta cadena
Funcionamiento: CortaCadena(cadena,maxlong)
cadena = cadena original
maxlong = máxima longitud que debe tener la cadena
Además la cadena incluye un vínculo a un correo con el mismo nombre (sin
seccionar)
Ejemplo:
CortaCadena("Hola mundo",4)
Hola..