Hack Forums
[.NET] Filenuke link grabber - Printable Version

+- Hack Forums (https://hackforums.net)
+-- Forum: Tech (https://hackforums.net/forumdisplay.php?fid=444)
+--- Forum: Coding (https://hackforums.net/forumdisplay.php?fid=151)
+---- Forum: Software Development (https://hackforums.net/forumdisplay.php?fid=118)
+---- Thread: [.NET] Filenuke link grabber (/showthread.php?tid=4318141)



Filenuke link grabber - tmk1337 - Jul 2, 2014

Hello,

Im trying to get the video-url from Filenuke.
I am succesfully receiving the link, however when i want to play the url with a other object then the webclient (VLC, Mediaplayer or whatever) it isnt working.

Somebody can help me with this ?

Thanks in advanced.


* - tmk1337 - Jul 2, 2014

Yes, its working for all other filehosting websites, only filenuke seems to be a problem.


* - tmk1337 - Jul 2, 2014

It just doesnt play the video, even when i paste the link in chrome it seems dead, but i dont see the reason for it.
If i manually grab the link from source code, it just works fine.. so it seems not to be VLC related.


* - tmk1337 - Jul 2, 2014

See first post for source :) edited to sample for problem link


* - tmk1337 - Jul 3, 2014

Code
Dim Webgrabber As New WebClient
Webgrabber.Headers.Add("User-Agent", "Mozilla/5.0 (Windows NT 6.2; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/35.0.1916")
Webgrabber.Headers.Add("Referer", Link)

Dim reqparm As New Specialized.NameValueCollection
reqparm.Add("method_free", "Free")

dim Link as string = "http://filenuke.com/k7hmkr9vgqhb"

Dim dresponsebytes = Webgrabber.UploadValues(Link, "POST", reqparm)
Dim dBronpagina As String = (New Text.UTF8Encoding).GetString(dresponsebytes)
dBronpagina = Split(Split(dBronpagina, "var lnk1 = '")(1), "';")(0) & Split(Split(dBronpagina, "var ext1 = '")(1), "';")(0)

Clipboard.SetText(dBronpagina)