

Private Sub WebView1_BeforeNavigate2(ByVal pDisp As Object, ByVal URL As Object, ByVal Flags As Object, ByVal TargetFrameName As Object, ByVal PostData As Object, ByVal Headers As Object, ByVal Cancel As Boolean)
'Change ads to what ever you can to cancel out eg doubleclick
If InStr(1, URL, "http://www.runescape.com/img/advert/advert.png", vbTextCompare) Then
Cancel = True
Else
Cancel = False
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If (WebBrowser1.Document.Url = New Uri("http://view.atdm*****m/2D1/iview/134671869/direct;wi.728;hi.90/01?click=")) Then
End If
End Sub
<!DOCTYPE HTML PUBLIC "-//W3C//DTD XHTML 1.0 Frameset//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd"> <html style="width:100%;height:100%;"> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /> <meta http-equiv="Content-Language" content="en-gb, English" /> <meta name="keywords" content="Runescape, Jagex, free, games, online, multiplayer, magic, spells, java, MMORPG, MPORPG, gaming" /> <meta name="description" content="Join the world's most popular free MMO RuneScape by Jagex Games Studio. Complete quests and win enormous treasures in a 3D world full of magic and monsters."> <title>RuneScape - The Number 1 Free Multiplayer Game</title> </head> <frameset cols="*" rows="*"> <frame style="width:100%;height:100%;margin:0;padding:0;" src="http://world45.runescape.com/,f4" width="100%" height="100%" scrolling="auto" frameborder="0" marginwidth="0" marginheight="0" /> </frameset> </html>