Results 1 to 5 of 5

Thread: a simple jukebox.

  1. #1

    Thread Starter
    Lively Member
    Join Date
    Jun 2000
    Location
    Ca
    Posts
    93
    Ok, say I wanted to make a jukebox. A simple one of course. I would have just 2 buttons. one that said play and one that said next song. My ideas for this jukebox are so that you can play mp3 files that are in the jukeboxes folder. What would I put in the first button |play| and the second |play next| button and in the form?
    Timbudtwo
    I have no life, only one with computers.

    VB 6.0 Enterprise Edition
    [hr]

  2. #2
    Guest
    Depends which MP3 control you are using to Play it. For example's sake, say the method is Play then you would use Play "C:\MP3s\MyMp3.mp3"

  3. #3
    Guest
    In that case, use can just play it by whatever the FileName is in the FileListBox.

    Code:
    ChDir App.Path  ' Change the Directory to our App path.
    MP3Name = File1.filename
    Play MP3Name ' Play whatever file is in the FileBox

  4. #4

    Thread Starter
    Lively Member
    Join Date
    Jun 2000
    Location
    Ca
    Posts
    93

    Question then how...

    then how will I make the |play next| button if I put that code in the first?
    Timbudtwo
    I have no life, only one with computers.

    VB 6.0 Enterprise Edition
    [hr]

  5. #5
    _______ HeSaidJoe's Avatar
    Join Date
    Jun 1999
    Location
    Canada
    Posts
    3,946

    ..jumping in here...

    ..doesn't like the word play..says function not defined..

    what am I missing.Option Explicit



    Private Sub File1_Click()
    Dim mp3Name
    ChDir App.Path ' Change the Directory to our App path.
    mp3Name = File1.FileName
    Play mp3Name ' Play whatever file is in the FileBox
    End Sub

    Private Sub Form_Load()
    ' make sure application path is correct before setting path property to avoid problems
    If Right(App.Path, 1) = "\" Then
    File1.Path = App.Path
    Else
    File1.Path = "c:\MyFolder All MP3 Files"
    End If

    ' Allow these file extensions to be displayed
    File1.pattern = "*.mp3*"


    "A myth is not the succession of individual images,
    but an integerated meaningful entity,
    reflecting a distinct aspect of the real world."

    ___ Adolf Jensen

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width