Publicentral.com - promocion de paginas webpromocion de paginas web
Mostrando Codigo - Asp
Code

Asp - Funcion para titulo de paginas

Códigos Asp

La función del título vuelve una secuencia que representa el título de una pagina web. Explora específicamente un pagina web que busca las etiquetas del título y vuelve lo que está mientras tanto. El path requerido es la trayectoria de una pagina
Visitas: 15,323 - 18/04/2003
DemoNO CONTIENE ARCHIVO DESCARGABLEComentario
EXPLICACION
Archivos que pueden ser leidos.[ * htm, * html, * asp, * cfm, * cgi, etc... ].
CODIGO
Codigo probado en ChromeCodigo probado en Mozilla FirefoxCodigo probado en Internet Explorer 7+Codigo probado en OperaCodigo probado en Safari


<% 'Codigo ofrecido por Tutores.org %>

  1. <% = Title(server.mappath("/public/ejemplo.html")) %>
  2. Aqui estaria el contenido.
  3. <%
  4. Private Function Title(byVal pathname)
  5.     dim objFSO, objFile, a, tmp, firstCt, secondCt
  6.     Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
  7.     Set objFile = objFSO.OpenTextFile(pathname, 1, False)
  8.     a = objFile.ReadAll()
  9.     objFile.Close
  10.     Set objFile = Nothing
  11.     Set objFSO = Nothing
  12.     firstCt  = InStr(UCASE(a), "<TITLE>") + 7
  13.     secondCt = InStr(UCASE(a), "</TITLE>")
  14.     tmp = Mid( a, firstCt, secondCt - firstCt )
  15.     Title = CStr( Trim( tmp ) )
  16. End Function
  17. %>
  18.  
  19.  
  20.  



ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo
<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Funcion para titulo de paginas" href="http://www.tutores.org/codigo/302/" target="_blank">Funcion para titulo de paginas</a>
<!-- Final enlace Tutores.org -->
COMENTARIOS
Aun no existe ningun comentario para este Codigo.
INSERTAR COMENTARIO

Usuario:
Email:
Comentario:
Codigo Seguridad


Antes de enviar un comentario...
Todos los comentarios son revisados personalmente
Todo comentario que no haga relacion al codigo mostrado en esta pagina sera eliminado

Usuarios registrados tienen preferencia en recibir respuestas de ayuda!!
Ademas de poder insertar Imagenes,Enlaces y otras propiedades del editor.
Por favor, insertar los comentarios descriptivos.