Page 2 of 2

Re: Dead Link Checker

Posted: Wed Sep 08, 2010 5:18 pm
by mandai
Or better yet a way that actually works:
Code: Select all
        Dim wc As Net.WebClient = New Net.WebClient()
        Try
            wc.DownloadData("http://localhost/index.htm")
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

Re: Dead Link Checker

Posted: Wed Sep 08, 2010 5:21 pm
by Axel
Or better yet a way that actually works:
Code: Select all
        Dim wc As Net.WebClient = New Net.WebClient()
        Try
            wc.DownloadData("http://localhost/index.htm")
            Return true
        Catch ex As Exception
            MsgBox(ex.Message)
            Return False
        End Try

Re: Dead Link Checker

Posted: Wed Sep 08, 2010 5:22 pm
by Adroxxx
So thank you dudes but which solution should I choose? lmao;

Re: Dead Link Checker

Posted: Wed Sep 08, 2010 5:23 pm
by Axel
Adroxxx wrote:
So thank you dudes but which solution should I choose? lmao;
i personally would choose the ping way...

Re: Dead Link Checker

Posted: Wed Sep 08, 2010 5:27 pm
by Adroxxx
I did it still says that the link is down although it isnt -.-

Re: Dead Link Checker

Posted: Wed Sep 08, 2010 5:32 pm
by Axel
Adroxxx wrote:
I did it still says that the link is down although it isnt -.-
unleash your creativity :D

maybe do this
Code: Select all
Dim truex as boolean
Public Function CheckX(ByVal Adress as string)
Try 
my.network.ping(adress)
return true
catch ex as exception
Msgbox(ex.message)
return false
end try
end function
Code: Select all
truex = Checkx
if truex = true then msgbox("working")
else
("not working")
end if
im doing this without vb so correct me if im wrong

Re: Dead Link Checker

Posted: Wed Sep 08, 2010 5:40 pm
by Adroxxx
Doesnt work lol

Is this Link Checker also meant for DOWNLOAD LINKS?