Using WebBrowser to news

• TDog: Tdog is at school
  Today at 04:52:23 AM
• Sealbreaker: http://www.touchofdeathforums.com/smf/index.php/topic,57753.msg615781.html#msg615781
  Today at 04:51:53 AM
• Jungletoe: Hello
  Today at 03:55:03 AM
• RavenStylez: hi hi
  Today at 02:50:03 AM
• мсичġġєт: hello
  Today at 01:47:08 AM
• lc3: ello everyone
  Today at 01:37:51 AM
• мсичġġєт: Autoupdatin shoutbox? NOOO!
  Today at 01:24:17 AM
• gothikaboy: Hi gamma
  March 11, 2010, 11:46:20 PM
• Gamma™: hi all
  March 11, 2010, 11:40:35 PM
• Anna Comnena: Marsh if you have a Hulu account I suggest the movie "Totally Baked"
  March 11, 2010, 11:04:46 PM
• Marsh: night admiral
  March 11, 2010, 10:10:49 PM
• Admiral Refuge: Well Eclipse, it's time for me to go to bed; night everyone.
  March 11, 2010, 10:10:16 PM

Scripting by waltercross
[Today at 05:26:24 AM]
Let's make a spritesheet! by Jungletoe
[Today at 04:25:34 AM]
Lets make a tileset! by Jungletoe
[Today at 04:19:06 AM]
The Rules of the Game by Godlord
[Today at 03:59:08 AM]
Im fairly new to this. by lc3
[Today at 03:23:04 AM]
Pointing something out... by Ddunit - Aizawa
[Today at 02:29:15 AM]
Pokemon Cyrus Online 2010 by Ddunit - Aizawa
[Today at 01:57:07 AM]
My first graphic by мсичġġєт
[Today at 01:39:55 AM]
Rate this image! by мсичġġєт
[Today at 01:36:52 AM]
Last one to post Wins by In7el3ct
[Today at 12:28:59 AM]

• Guests: 28
• Hidden: 1
• Users: 8
• Users Online:

• Gamma™
• Yoseph
• Gwen
• Harris
• MegaDude
• Sealbreaker
• waltercross

Hi guys! I'm here again... Now I'll teach you to choose between WebBrowser or the original coming with engine for show "the news". First you'll need add a component... Project > Components > Microsoft Internet Controls. Well, go to frmMainMenu and add 2 OptionButton and change they names to: optWeb and optIni. Add a WebBrowser and change the name to: webNews

C'mon to codes 

On frmMainMenu, find: Private Sub Form_Load()
And search for Call MainMenuInit. Bellow add:

Code: [Select]

If ReadINI("CONFIG", "News", App.Path & "\config.ini") = "Web" Then
        picNews.Visible = False
        webNews.Visible = True
        optWeb.Value = True
        optIni.Value = False
        webNews.Navigate "www.yoursite.com/news.php"
    ElseIf ReadINI("CONFIG", "News", App.Path & "\config.ini") = "Ini" Then
        picNews.Visible = True
        webNews.Visible = False
        optWeb.Value = False
        optIni.Value = True
    ElseIf ReadINI("CONFIG", "News", App.Path & "\config.ini") <> "Web" Then
        MsgBox "Your file, config.ini, has been changed and there is no automatic solutions. Please contact an administrator to fix the problem!"
        End
    ElseIf ReadINI("CONFIG", "News", App.Path & "\config.ini") <> "Ini" Then
        MsgBox "Your file, config.ini, has been changed and there is no automatic solutions. Please contact an administrator to fix the problem!"
        End
    End If
Now in event click of optWeb, add:

Code: (vb) [Select]

    If webNews.Visible = True Then
        Exit Sub
    Else
        Call WriteINI("CONFIG", "News", "Web", (App.Path & "\config.ini"))
        picNews.Visible = False
        webNews.Visible = True
        optWeb.Value = True
        optIni.Value = False
        webNews.Navigate "www.yoursite.com/news.php"
    End If
And in event click of optIni, add:

Code: (vb) [Select]

    If picNews.Visible = True Then
        Exit Sub
    Else
        Call WriteINI("CONFIG", "News", "Ini", (App.Path & "\config.ini"))
        picNews.Visible = True
        webNews.Visible = False
        optWeb.Value = False
        optIni.Value = True
    End If
Now just miss put on config.ini, on the bottom:

Code: [Select]

News=Web
Images (I used the mode of events and news):





Just it.
Credits: HatakeAzzi

Edit:
U can use it to make news of events and more

Edit²:
I forget a thing...

Edit³:
Added some images

Joker ~

Thats cool, but dont use spoilers its screwing up code thing

Tipsta

Ok! I'm sorry. I'll edit it now.

Joker ~

Nice, works great

Tipsta

Thanks

Joker ~

You should add image and color support

Tipsta

Alright, some imagens been added.

Joker ~

Wouldn't it have just been quicker to use a webbrowser control and just make the radio buttons hide the control or the news box?

This is still quite good though.

Zero3X

It is a good idea too, I do not thought about it

Joker ~