SprintDevelop.com - Diseño y desarrollo web - Diseño, desarrollo web,Aplicaciones Móviles, TabletasSprintDevelop.com - Diseño y desarrollo web
Mostrando Codigo - Asp
Code

Asp - Comprobar la existencia de una url

Códigos Asp

Tal y como indica el titulo, este codigo consigue verificar si existe o no una url. Para la utilizacion de este script debemos tener istalado el componente Msxml2.XMLHTTP . Solo debemos modificar la url, de la linea 2 o bien obtenerla desde formulario o cadena.
Visitas: 16,354 - 03/04/2004 20:45:46
CODIGO SIN DEMOSTRACIONNO CONTIENE ARCHIVO DESCARGABLEComentario
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. <%
  2. revisar_url = "http://www.tutores.org"
  3. Response.write "<br>Revisando:<b>" & revisar_url & "</b><br>"
  4. If comprobar_componente("Msxml2.XMLHTTP") Then
  5. Select Case Revisar_esta_url(revisar_url)
  6. Case 200 : Response.Write "La url Si existe."
  7. Case 404 : Response.Write "El sitio web existe, pero no la pagina especificada"
  8. Case Else : Response.Write "La url indicada ouede que no exista"
  9. End Select
  10. Else
  11. Response.Write "Necesitas tener instalado el componente Msxml2.XMLHTTP"
  12. End if
  13. Function comprobar_componente(ProgId)
  14. Dim objeto_temp
  15. On Error Resume Next
  16. Set objeto_temp = Server.CreateObject(ProgId)
  17. If Err.Number = 0 Then
  18. comprobar_componente = True
  19. Else
  20. comprobar_componente = False
  21. End If
  22. Set objeto_temp = Nothing
  23. End Function
  24. Function Revisar_esta_url(strURL)
  25. Dim objXML
  26. Set objXML = CreateObject("Msxml2.XMLHTTP")
  27. objXML.open "GET", strURL, false
  28. On error resume next
  29. objXML.send
  30. Revisar_esta_url = objXML.Status
  31. End Function
  32. %>



ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo
<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Comprobar la existencia de una url" href="http://www.tutores.org/codigo/1031/" target="_blank">Comprobar la existencia de una url</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.