[Help]

[Help]

Hi ,,,,,,,,,,,,,,,,

how to make app that show updates , like
this :
and not with webbrowser
but not downloads , updates from crossfire eu site (events)

Originally Posted by tynab

Hi ,,,,,,,,,,,,,,,,

how to make app that show updates , like
this :
and not with webbrowser
but not downloads , updates from crossfire eu site (events)

Something like this then: (Not made by me!)

Code:

    Dim WReq As WebRequest = WebRequest.Create("MPGH CF URL")
    WReq.Timeout = 100000

    Dim wResp As WebResponse = WReq.GetResponse()
    Dim T As String
    Using r As StreamReader = New StreamReader(wResp.GetResponseStream(), Encoding.ASCII)
        T = r.ReadToEnd()
    End Using
    RichTextBox1.Text = T

And then, you look at the code you get.
Then you can filter out data you want.

Originally Posted by Jorndel

Something like this then: (Not made by me!)

Code:

Dim WReq As WebRequest = WebRequest.Create("MPGH CF URL") WReq.Timeout = 100000 Dim wResp As WebResponse = WReq.GetResponse() Dim T As String Using r As StreamReader = New StreamReader(wResp.GetResponseStream(), Encoding.ASCII) T = r.ReadToEnd() End Using RichTextBox1.Text = T

And then, you look at the code you get.
Then you can filter out data you want.

Tnx , I'll try it

Originally Posted by tynab

Tnx , I'll try it

You're Welcome.

If you would like me to make something "noob". I could try

(I'm not a pro-coder so, you're mostly like better than me

)

Originally Posted by tynab

Did you make this code xD ? cuz it seems pro to me ?

Nope. (said so)

But I could have made something like it. (Just I'm using C#

)

Originally Posted by Jorndel

You're Welcome.

If you would like me to make something "noob". I could try
(I'm not a pro-coder so, you're mostly like better than me )

Did you make this code xD ? cuz it seems pro to me ?
xDa ok , i imported

Code:

Imports System.Net Imports System**** Imports System.Text

now the code its good

---------- Post added at 05:10 AM ---------- Previous post was at 05:08 AM ----------

i started debuging and this line gives error Dim WReq As WebRequest = WebRequest.Create("MPGH CF URL")

now its working tnx ! but its still not like news updater

---------- Post added at 05:18 AM ---------- Previous post was at 05:10 AM ----------

Originally Posted by Jorndel

Nope. (said so)

But I could have made something like it. (Just I'm using C# )

can you make it in c# do you know c++ ?

Originally Posted by tynab

Did you make this code xD ? cuz it seems pro to me ?
xDa ok , i imported

Code:

Imports System.Net Imports System**** Imports System.Text

now the code its good

---------- Post added at 05:10 AM ---------- Previous post was at 05:08 AM ----------

i started debuging and this line gives error Dim WReq As WebRequest = WebRequest.Create("MPGH CF URL")

now its working tnx ! but its still not like news updater

---------- Post added at 05:18 AM ---------- Previous post was at 05:10 AM ----------

can you make it in c# do you know c++ ?

Erm, I can see what my nooby skills are able to do.
I'm not good at this so :P

Originally Posted by Jorndel

Erm, I can see what my nooby skills are able to do.
I'm not good at this so :P

ok

Originally Posted by tynab

Dam, so nooby

(It's 10x Times easier for me to do it with web.browser to get the content

)

Anyway, here is what I managed. (It just splits, and takes the release tagged ones.
(It's very nooby. And I didn't fix the HTML or the Title, in case you wanted to play with them)
(Regex or so it something you should look at

)

Code:

Dim red As Boolean = False
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim WebC As WebClient = New WebClient()
        Dim MyStr As String = WebC.DownloadString("http://www.mpgh.net/forum/175-crossfire-hacks-cheats/").Normalize()
        RichTextBox1.Lines = MyStr.Split("<a")

        For Each ab As String In RichTextBox1.Lines
            If ab.Contains("b>[Release]") Then red = True
            If red = True Then
                If ab.Contains("http") Then
                    RichTextBox2.AppendText(ab + vbNewLine + vbNewLine + vbNewLine)
                    red = False
                End If
            End If
        Next
    End Sub

Tip would be: http://www.mpgh.net/forum/33-visual-...ml#post7156659

Since master131 know what he is doing

That download page in the picture was taken from here:
CrossFire Hacks / Cheats

Probably just a normal webbrowser. /

Originally Posted by master131

That download page in the picture was taken from here:
CrossFire Hacks / Cheats

Probably just a normal webbrowser. /

Well, he didn't want it in a web-browser so

That was the "problem"

Too much code involved, I'm not going to spoonfeed, sorry. It can also be quite troublesome if they decide to change the layout of their site, so a webbrowser is the safest way tbh.

ok , i'll make nice website ans put webbrowser

Originally Posted by tynab

ok , i'll make nice website ans put webbrowser

Good Luck, don't hesitate to ask if you're in need of help

Post a Reply

Similar Threads

Tags for this Thread