Help! (please)

[ystuk]

Here are all the errors I can find in my VB6 client.

Set Segment = Loader.LoadSegment(App.Path & MUSIC_PATH & fileName)

' repeat midi file

Segment.SetLoopPoints 0, 0

Segment.SetRepeats 100

Segment.SetStandardMidiFile

Performance.PlaySegment Segment, 0, 0

Music_Playing = fileName

' Error handler

Exit Sub

errorhandler:

If InGame Then

HandleError "PlayMidi - Ingame = True - Map#= " & Player(MyIndex).Map & " - Filename = " & fileName & " - Filepath Length= " & Len(App.Path & MUSIC_PATH & fileName), "modSound", Err.Number, Err.Description, Err.Source, Err.HelpContext

Else

HandleError "PlayMidi - Ingame = False - Filename = " & fileName & " - Filepath Length= " & Len(App.Path & MUSIC_PATH & fileName), "modSound", Err.Number, Err.Description, Err.Source, Err.HelpContext

End If

Err.Clear

Exit Sub

End Sub