Dead Link Checker

Do you need something made? then ask in here.
Forum rules
Please LOCK your topics once you have found the solution to your question so we know you no longer require help with your query.
17 posts Page 2 of 2
Contributors
User avatar
mandai
Coding God
Coding God
Posts: 2585
Joined: Mon Apr 26, 2010 6:51 pm

Re: Dead Link Checker
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
User avatar
Axel
Coding God
Coding God
Posts: 1928
Joined: Sun Jun 27, 2010 9:15 pm

Re: Dead Link Checker
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
http://vagex.com/?ref=25000
User avatar
Adroxxx
Member
Member
Posts: 26
Joined: Sat Aug 21, 2010 1:46 pm

Re: Dead Link Checker
Adroxxx
So thank you dudes but which solution should I choose? lmao;
User avatar
Axel
Coding God
Coding God
Posts: 1928
Joined: Sun Jun 27, 2010 9:15 pm

Re: Dead Link Checker
Axel
Adroxxx wrote:
So thank you dudes but which solution should I choose? lmao;
i personally would choose the ping way...
http://vagex.com/?ref=25000
User avatar
Adroxxx
Member
Member
Posts: 26
Joined: Sat Aug 21, 2010 1:46 pm

Re: Dead Link Checker
Adroxxx
I did it still says that the link is down although it isnt -.-
User avatar
Axel
Coding God
Coding God
Posts: 1928
Joined: Sun Jun 27, 2010 9:15 pm

Re: Dead Link Checker
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
http://vagex.com/?ref=25000
User avatar
Adroxxx
Member
Member
Posts: 26
Joined: Sat Aug 21, 2010 1:46 pm

Re: Dead Link Checker
Adroxxx
Doesnt work lol

Is this Link Checker also meant for DOWNLOAD LINKS?
17 posts Page 2 of 2
Return to “Tutorial Requests”