Build MP3 Player without WMP OCX

[chokies12]

hello guys im new here..hope you can help make my first project in visual basic..i want to make a mp3 player in visual basic without using the WMP OCX.. i have started i downloaded a simple mp3 player without WMP OCX and use it as a reference but since it has no tutorial i have to see the codes 1by1 i cant play my project..here's my code..

 
Private Sub CmdBrowse_Click()
On Error GoTo error
 
 With CDlg1
   'On Cancel do nothing
   .CancelError = True
 
   .DialogTitle = "Browse For MP3 Files"
   .Filter = "MP3 Files (*.mp3) |*.mp3; |Wave Files (*.wav) |*.wav; |Midi Files (*.mid) |*.mid"
   .ShowOpen
   'Handle no filename
   If Len(.FileName) = 0 Then Exit Sub
 
   txtFile.Text = .FileName
   CmdPlay.SetFocus 'Press enter to play
 End With
 
error:  'Do nothing
End Sub
 
Private Sub CmdPlay_Click()
Play
End Sub
 
Private Sub TxtFile_Change()
Dim Ext As String
'Check if there is a string in txtFile
 If txtFile <> "" Then
    'File extension is the last three letters
    Ext = LCase(Right(txtFile, 4))
    'If extension is supported enable player buttons
    If Ext = ".mp3" Or Ext = ".wav" Or Ext = ".mid" Then
      CmdPlay.Enabled = True
      CmdPause.Enabled = True
      CmdStop.Enabled = True
      CmdRew.Enabled = True
      CmdFF.Enabled = True
      chkLoop.Value = 1
    End If
 Else
    'If no file name disable player buttons
    CmdPlay.Enabled = False
    CmdPause.Enabled = False
    CmdStop.Enabled = False
    CmdRew.Enabled = False
    CmdFF.Enabled = False
    chkLoop.Value = 2
 End If
End Sub
 

when i open i file i gives a error about thet command "Play" i think theres something wrong about it but in my reference player thats the only command in the CmdPlay button

[debasisdas]

What is that Play in your code ?

[chokies12]

oh your right "Play" Has no value..

how do i declare a value for play?can you kindly help me im new in visual basic..

[VBWheaties]

oh your right "Play" Has no value..

how do i declare a value for play?can you kindly help me im new in visual basic..

Whats this mp3 player that you downloaded and set a reference to? Need the name of it in order to understand its code.

[chokies12]

i downloaded this at freevbcode.com "Pocket Player" here's the code im looking at it 1by1 so i can understand how it was made..

[chokies12]

i cant seem to post the the pocket player code..it seems that its too long so there nothing that appears in my reply..

DL link for the pocket player code

[chokies12]

please help me with this project..how do i declare a function for play?

[chokies12]

please help me need your answer about this

[Killer42]

you need to have some patience. The people who respond here are volunteering their own time, and are located in various timezones around the world.

I'd have a look at the code now, but my work system blocks access when I try to open the link. :-(

[chokies12]

you need to have some patience. The people who respond here are volunteering their own time, and are located in various timezones around the world.

I'd have a look at the code now, but my work system blocks access when I try to open the link. :-(

oh im sorry about my impatience..im having problem posting the code here since its too long..