Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Question for anyone decent with MySQL
#1
Ok im adding the custom experience guide. Its no problem but im using 3.0.7 which uses mysql instead of ini files. Ok that shouldnt be a big deal right? Just find how it loads other tables and so the same but for exp...

well I copied loadnpcs and then switched all for the exp table and doesnt look bad but gets this error...

With object must be user-defined type, Object, or Variant
Then it highlights WITH

Heres the code..
Code:
Sub LoadExps()
Dim i As Long
Dim cCount As Long
Dim RS As ADODB.Recordset

'Setup database stuff
Set RS = New ADODB.Recordset
RS.Open "SELECT * FROM exps;", Conn_Server, adOpenStatic, adLockReadOnly

If RS.EOF Then Exit Sub

RS.MoveFirst
    
For i = 1 To MAX_EXP
    Call SetStatus("Loading Exp " & i & "/" & MAX_EXP)
    With Exp(i)
        .FKey = CLng(RS("FKey"))
        .Exp = CLng(RS("Exp"))
    End With
    DoEvents
    If i  MAX_EXP Then
        RS.MoveNext
    End If
Next i
RS.Close
Set RS = Nothing
End Sub

My table is set up simple.

Theres FKey and then Exp and thats it ... should be enough.
Reply
#2
I use 303 w/ mysql, added my self. If you need any help, add me on msn(mailto:azchohfi@hotmail.com) and/or gtalk(mailto:blackagesbr@gmail.com).
The code seams to be fine. If its not working, probly the data base is not beeing started up correctly thru VB. Tell me the exact error so I can help you better ^^
Reply
#3
Ok I added you to MSN. Its the Custom Experience tutorial from the old servers I just changed the part that loads it to work with MySQL.

I guess I got some part wrong there.

Like for the original it loads EXP1, EXP2 and so on... but sql is different unless making a row for each one which wouldnt make sense.
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)