Avatar billede lund_dk Praktikant
21. maj 2007 - 13:40 Der er 6 kommentarer og
1 løsning

tjek om url findes

Kan jeg på nogen måde lave et tjek på
http://www.google.com
eller
http://www.sitefindesikke.com

Hvor jeg får en false eller true værdi tilbage, om sitet der linkes til findes eller ikke..?
Avatar billede heinzdmx Nybegynder
21. maj 2007 - 14:40 #1
Du kan gå ind på siden http://www.html.dk/scripts/asp/00009 hvor du, hvis du har komponenten AspHTTP link til download er der, kan tjekke om links føre til en side. Der er en udførlig guide

Et eksempel er siden http://www.html.dk/scripts/asp/00009/eksempel.asp
Avatar billede lund_dk Praktikant
21. maj 2007 - 14:46 #2
Kan det gøres uden komponent, min udbyder har nemlig ikke AspHTTP installeret :(
Avatar billede madeindk Nybegynder
21. maj 2007 - 20:46 #3
Ja - det kan det sagtens.

<%
Set XMLHTTP = CreateObject("MSXML2.ServerXMLHTTP") 

XMLHTTP.open "HEAD", "http://www.google.com", false 
XMLHTTP.send "" 

If XMLHTTP.status = 200 then
  Response.Write "Adressen blev fundet :)"
Else
  Response.Write "Adressen blev <b>ikke</b> fundet :("
End If
   
Set XMLHTTP = Nothing
%>
Avatar billede heinzdmx Nybegynder
22. maj 2007 - 15:53 #4
er det muligt at teste flere sider på en gang?
det bare at sætte en ekstra
XMLHTTP.open "HEAD", "http://www.google.com", false 
fortæller stadig kun om den første url
Avatar billede lund_dk Praktikant
23. maj 2007 - 09:37 #5
smid et svar madeindk
Avatar billede lund_dk Praktikant
23. maj 2007 - 09:43 #6
Jeg får fejl hvis en side ikke findes



Fejltype:
msxml3.dll (0x80072EE7)
The server name or address could not be resolved
tjekurl.asp, line 5
Avatar billede lund_dk Praktikant
23. maj 2007 - 09:45 #7
Nå, jeg fandt dette

<% 
    ' deliberate typo: 
    url = "http://www.lund.dk" 

    set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP") 
    on error resume next 
    xmlhttp.open "HEAD", url, false 
    xmlhttp.send "" 
    status = xmlhttp.status
    if err.number <> 0 or status <> 200 then
        if status = 404 then
            Response.Write "Page does not exist (404)."
        elseif status >= 401 and status < 402 then
            Response.Write "Access denied (401)."
        elseif status >= 500 and status <= 600 then
            Response.Write "500 Internal Server Error on remote site."
        else
            Response.write "Server is down or does not exist."
        end if
    else 
        Response.Write "Server is up and URL is available." 
    end if 
    set xmlhttp = nothing 
%>
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester