Good afternoon guys! I need my program made in vbnet to read a string from a php or txt file upado in a website. I'm using the following code:
Dim Client As New WebClient
Dim URL As String = "address" '// <-- Site/endereço do arquivo .php ou .txt
Dim Reply As String = Client.DownloadString(URL)
TextBox1.Text = Reply
The php / txt file only contains the "1.0" numbers without quotation marks, but the DownloadString returns the following:
<html>
<body>
<script type="text/javascript" src="/aes.js"></script>
<script>
function toNumbers(d) {
var e = [];
d.replace(/(..)/g, function(d) {
e.push(parseInt(d, 16))
});
return e
}
function toHex() {
for (var d = [], d = 1 == arguments.length && arguments[0].constructor == Array ? arguments[0] : arguments, e = "", f = 0; f < d.length; f++) e += (16 > d[f] ? "0" : "") + d[f].toString(16);
return e.toLowerCase()
}
var a = toNumbers("f655ba9d09a112d4968c63579db590b4"),
b = toNumbers("98344c2eee86c3994890592585b49f80"),
c = toNumbers("d4ba37c1b7e2b061af725551b59483a9");
document.cookie = "__test=" + toHex(slowAES.decrypt(c, 2, a, b)) + "; expires=Thu, 31-Dec-37 23:55:55 GMT; path=/";
location.href = "http://vindictusbr.epizy.com/launcher/status.php?i=1";
</script><noscript>This site requires Javascript to work, please enable Javascript in your browser or use a browser with Javascript support</noscript>
</body>
</html>
I need to return only "1.0" and I tried to use the Wamp Server and put the local address " link " and so on worked out for some reason. It returned only 1.0 in the text box.
Can anyone help me please? I've been trying to solve this for hours ... I've used the "Imports System.Net". I have no idea what might be going wrong, I've tried everything.
Thank you!