[Auto updater client launch]

That did the trick. Many thanks.

[Auto updater client launch]

Error,

Compile Error:

Syntax error

did I misplace it?
```
Private Sub lblExit_Click()
    ' Start the game and call the game destroy sub

    Shell("client.exe", vbNormalFocus)

    DestroyUpdater
End Sub
```

[Auto updater client launch]

Thanks, I'll try it out when I get home after school.

[Auto updater client launch]

Hello everyone I've been trying to figure out just what am I doing wrong? I'm trying to make the auto updater run the client when you press the exit button.

Source:
```
Private Sub lblExit_Click()
    ' call the game destroy sub and start the game

    Dim Res
    Dim Filename
      Filename = "client.exe"
      Res = Shell("start.exe " & Filename, vbHide)

    DestroyUpdater

End Sub
```

[CS:DV to MySql database]

Thank you very much! That is information that I needed to know. I think my knowledge for this type of programming is too low. From what I gathered I need two servers. One for the game and then one for the data base. The client, and then the MySql database.

[CS:DV to MySql database]

Thanks I had no idea ADO was. I'll begin shortly after I figure out what I have to do for the database*part.

[CS:DV to MySql database]

I want to learn how to connect the CS:DV engine to a MySql database. I've tried to do it myself but I do not know enough about MySql.

What I need to happen is:
User clicks login
Send data to the webhost
Webhost sends data to server
Server connect to the client

At least this is what I think should happen, like I said I haven't the slightest clue about MySql. Have to learn sometime though.

[Noob Posting]

hi I ned to get my game working i read everything it don't work! fix it for me some1 plox?!?!?!@$$!@!@

[Help Eclipse]

Done and done. I won't do it VIA FB though, my folks can be so weird about this forum.

[Auto updater runtime error 13 Solved]

Okay I have been trying to use Robin's auto updater. I have followed every last guide on this topic. I have uploaded my files (version1.rar & update.ini) to www.elazar.webs.com/update. Then when I run the auto updater it crashes and says run time error 13 Type Mismatch. I have redownloaded, used a different host, and use it on another computer. Is there a step I am somehow over looking?

EDIT: sorry turns out the webs host had some down time.

[Robin's programming shop]

I would like to buy something from your shop when it re-opens. I will not give out the link like a cheap minded child. Basically they stole money from you.

[Crystalshire v1.8.0]

Delete the maps from the client side like I did?

[Quest system]

Okay thanks, just the info I needed. I have everything done client side then.

[Quest system]

Okay, I want to make a pure VB quest system but do I start server side or client side. I have the quest list down, and I believe the player file is completed, now do I put the quest on the server or the client?

[[EO] Crash upon hover]

Yep you helped now just have to figure out how to add a quest system, I want it purely VB 6.0 not that scripted stuff. First thing I guess I have to do is update the player save file.

[[EO] Crash upon hover]

Thanks you two it works now. Next part is to get the picture and the button together. I hope that made sense.

[[EO] Crash upon hover]

Okay when I hover a button thats index is 7 it crashes. I have no idea why. I have the Quests button on index 5 and the trade on index 6 while the party button is on index 7\. When I hover the buttons they all work but index 7 (Party button) Is there something I have to add elsewhere to accept the seventh button?

>! Private Sub imgButton_Click(Index As Integer)
Dim Buffer As clsBuffer
Dim i As Long

    ' If debug mode, handle error then exit out
    If Options.Debug = 1 Then On Error GoTo errorhandler

    Select Case Index
        Case 1
            If Not picInventory.Visible Then
                ' show the window
                picInventory.Visible = True
                picCharacter.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                BltInventory
                ' play sound
                PlaySound Sound_ButtonClick
            End If
        Case 2
            If Not picSpells.Visible Then
                ' send packet
                Set Buffer = New clsBuffer
                Buffer.WriteLong CSpells
                SendData Buffer.ToArray()
                Set Buffer = Nothing
                ' show the window
                picSpells.Visible = True
                picInventory.Visible = False
                picCharacter.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                ' play sound
                PlaySound Sound_ButtonClick
            End If
        Case 3
            If Not picCharacter.Visible Then
                ' send packet
                SendRequestPlayerData
                ' show the window
                picCharacter.Visible = True
                picInventory.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                ' play sound
                PlaySound Sound_ButtonClick
                ' Render
                BltEquipment
                BltFace
            End If
        Case 4
            If Not picOptions.Visible Then
                ' show the window
                picCharacter.Visible = False
                picInventory.Visible = False
                picSpells.Visible = False
                picOptions.Visible = True
                picParty.Visible = False
                picQuests.Visible = False

                ' play sound
                PlaySound Sound_ButtonClick
            End If

              Case 5
                      If Not picQuests.Visible Then
                  ' show the window
                picInventory.Visible = False
                picCharacter.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = True

                ' play sound
                PlaySound Sound_ButtonClick
            End If

        Case 6
            If myTargetType = TARGET_TYPE_PLAYER And myTarget <> MyIndex Then
                SendTradeRequest
                ' play sound
                PlaySound Sound_ButtonClick
            Else
                AddText "Invalid trade target.", BrightRed
            End If

        Case 7

            ' show the window
            picCharacter.Visible = False
            picInventory.Visible = False
            picSpells.Visible = False
            picOptions.Visible = False
            picParty.Visible = True
            picQuests.Visible = False
            ' play sound
            PlaySound Sound_ButtonClick

    End Select

    ' Error handler
    Exit Sub
errorhandler:
    HandleError "imgButton_Click", "frmMain", Err.Number, Err.Description, Err.Source, Err.HelpContext
    Err.Clear
    Exit Sub
End Sub

[Varible not defined [SOLVED]]

Okay thanks man, found the problem I missed an s in one of them. Gosh I feel like the biggest idiot in the world. Anyways thanks.

[Varible not defined [SOLVED]]

It has one of those picture objects like options, character ones have. Maybe I need to name it right?

[Varible not defined [SOLVED]]

picQuests.Visible = False

[Varible not defined [SOLVED]]

I am having so much troble with this bit of code. Says I did not define a varible. May I have some insight on this and what it means. Also how does this work? Sorry I have no idea how to program in VB 6.

>! Private Sub imgButton_Click(Index As Integer)
Dim Buffer As clsBuffer
Dim i As Long

    ' If debug mode, handle error then exit out
    If Options.Debug = 1 Then On Error GoTo errorhandler

    Select Case Index
        Case 1
            If Not picInventory.Visible Then
                ' show the window
                picInventory.Visible = True
                picCharacter.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                BltInventory
                ' play sound
                PlaySound Sound_ButtonClick
            End If
        Case 2
            If Not picSpells.Visible Then
                ' send packet
                Set Buffer = New clsBuffer
                Buffer.WriteLong CSpells
                SendData Buffer.ToArray()
                Set Buffer = Nothing
                ' show the window
                picSpells.Visible = True
                picInventory.Visible = False
                picCharacter.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                ' play sound
                PlaySound Sound_ButtonClick
            End If
        Case 3
            If Not picCharacter.Visible Then
                ' send packet
                SendRequestPlayerData
                ' show the window
                picCharacter.Visible = True
                picInventory.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = False
                ' play sound
                PlaySound Sound_ButtonClick
                ' Render
                BltEquipment
                BltFace
            End If
        Case 4
            If Not picOptions.Visible Then
                ' show the window
                picCharacter.Visible = False
                picInventory.Visible = False
                picSpells.Visible = False
                picOptions.Visible = True
                picParty.Visible = False
                picQuest.Visible = False
                ' play sound
                PlaySound Sound_ButtonClick
            End If
                Case 5
                      If Not picQuests.Visible Then
                  ' show the window
                picInventory.Visible = False
                picCharacter.Visible = False
                picSpells.Visible = False
                picOptions.Visible = False
                picParty.Visible = False
                picQuests.Visible = True

                ' play sound
                PlaySound Sound_ButtonClick
            End If
        Case 6
            If myTargetType = TARGET_TYPE_PLAYER And myTarget <> MyIndex Then
                SendTradeRequest
                ' play sound
                PlaySound Sound_ButtonClick
            Else
                AddText "Invalid trade target.", BrightRed
            End If
        Case 7
            ' show the window
            picCharacter.Visible = False
            picInventory.Visible = True
            picSpells.Visible = False
            picOptions.Visible = False
            picParty.Visible = False
            picQuests.Visible = False
            ' play sound
            PlaySound Sound_ButtonClick
    End Select

    ' Error handler
    Exit Sub
errorhandler:
    HandleError "imgButton_Click", "frmMain", Err.Number, Err.Description, Err.Source, Err.HelpContext
    Err.Clear
    Exit Sub
End Sub

[Runescape thread]

Ahrim Neil
World I don't know I just click the play now button.

Stats
let me see if I can find that picture.
[](http://www.freemmorpgmaker.com/files/imagehost/#163c330e7bf2b1c51ad1c15b1d192a99.png)

Free to play at the moment can't brother to pay when I have more work than time.
Almost had the quest cape until Nomad quest came out, I don't really like combat so I passed on that quest. Working on 99 firemaking when I'm bored enough to do so.

Also lol @ Robin's post.

[FTP]

Okay then I take it as a no then. Do you know of any FTP hosts that I may use for your auto updater? That are free.

[FTP]

They also have a server.

[FTP]

Okay I've been looking for a FTP host for the auto updater. I was wondering if I could FileZilla for the FTP host? If not do you know of any FREE FTP hosts?