Quick Search for:  in language:    
MCI,API,NOTE,Fixed,source,will,make,your,Play
   Code/Articles » |  Newest/Best » |  Community » |  Jobs » |  Other » |  Goto » | 
CategoriesSearch Newest CodeCoding ContestCode of the DayAsk A ProJobsUpload
Visual Basic Stats

 Code: 3,149,602. lines
 Jobs: 144. postings

 How to support the site

 
Sponsored by:

 

You are in:

 
 
PDC 2003: Make the connection
Login



Latest Code Ticker for Visual Basic.
Click here to see a screenshot of this code!HistoryWriter Add-In V.1
By Zvonko Kostovski on 9/3

(Screen Shot)

Click here to see a screenshot of this code!Control Winamp
By Dennis Wollentin on 9/3

(Screen Shot)

Fake Virus Version 1.0
By C.J. Laing on 9/3


][String Encoder
By Andron Smth on 9/3


Font Catalog
By Bill Adams on 9/3


professional search
By Ziad Said on 9/3


Click here to see a screenshot of this code!Drew's Meta Tag Generator
By Drew Phillips on 9/3

(Screen Shot)

Fast BruteForce Class
By §e7eN on 9/3


Click here to see a screenshot of this code!Lotus Domino Exploit Scanner
By §e7eN on 9/3

(Screen Shot)

Click here to put this ticker on your site!


Add this ticker to your desktop!


Daily Code Email
To join the 'Code of the Day' Mailing List click here!





Affiliate Sites



 
 
   

Make your own CD-Player!

Print
Email
 
winzip icon
Submitted on: 4/23/1999
By: Michael Canejo  
Level: Intermediate
User Rating: By 3 Users
Compatibility:VB 4.0 (32-bit), VB 5.0, VB 6.0

Users have accessed this code 30760 times.
 

(About the author)
 
     Fixed it! This is the source that will let you make your own CD Player! It uses the Media Control Interface (MCI) via API to play a audio cd. [NOTE: For this class to work on a form you must reference the class eg. (Set Snd = New CDAudio. I already have prepared it in the included zip.)

 
winzip iconDownload code

Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzipto decompress it.

Virus note:All files are scanned once-a-day by Planet Source Code for viruses,but new viruses come out every day, so no prevention program can catch 100% of them.

FOR YOUR OWN SAFETY, PLEASE:
1)Re-scan downloaded files using your personal virus checker before using it.
2)NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
3)Scan the source code with Minnow's Project Scanner

If you don't have a virus scanner, you can get one at many places on the net including:McAfee.com

 
Terms of Agreement:   
By using this code, you agree to the following terms...   
1) You may use this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.   
2) You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.   
3) You may link to this code from another website, but ONLY if it is not wrapped in a frame. 
4) You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.


Other 45 submission(s) by this author

 

 
Report Bad Submission
Use this form to notify us if this entry should be deleted (i.e contains no code, is a virus, etc.).
Reason:
 
Your Vote!

What do you think of this code(in the Intermediate category)?
(The code with your highest vote will win this month's coding contest!)
Excellent  Good  Average  Below Average  Poor See Voting Log
 
Other User Comments
4/14/1999 10:59:00 AM:Peter Farnworth
To get rid of the sid effect use the 
command stop.visible = false put this 
in the stop button private sub 
stop_click. this will stop people 
clicking on the stop button.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/14/1999 1:14:00 PM:Metallica man
hey, i put ion the code and 
everything.. but it sais compile error 
ambiguous name detected 
form_load!!!!!!!!!!!!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/14/1999 5:52:00 PM:James Olinger
The reason you are getting that error 
is
because you have two form_load 
subs. If
you look through the code you 
will find
the mistake.
P.S.
Chance, 
give Mike a break cause he is
only 13 
years old and programming in VB.
When 
I was 13 I only did Java and 
JavaScript.
I didn't start programming 
in VB and C++
until I was fourtean.  
Which was acouple
of monts ago.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/15/1999 5:34:00 AM:ROBERTO RODRIGUEZ
Congratulations ...
I learned Vb. 
along without any person that teach me. 
I will continue learning Vb. along and 
thank's for your examples. I'll write 
you soon.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/15/1999 11:49:00 AM:Mark W.
Mike, 
     That is a pretty dam good 
job man, keep it up.  I am only 16 and 
I am learning 5 languages.  I am aready 
do advanced in computers the computer 
lab teacher does not like me in her 
class.  And like today I cracked her 
passwords.  
Don't worry know what you 
wanna be whenyou get older,  a 
hacker... Yup Yup 
I am, and the why 
you are looking now you will be pretty 
dam good!
 hope you get up there with 
bill gates!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/15/1999 3:33:00 PM:David Halter
Hey i am 14 and i am an intermediate at 
VB. I started VB when i was 12, but i 
admit i still kinda suck. I have my own 
Software CO. and i need lots of help on 
sprites. I am even learning C++, so i 
can understand what this kid is going 
through. CYA
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/15/1999 6:13:00 PM:PhatPhreakk
Ure one raw kid for 13 and knowin all 
that.  I started at twelve but slacked 
off during the years and forgot most of 
what I learned.  I got one ques., how 
can I save something through the code.  
Like if someone usin my program wanted 
to save info. so it wont disappear 
after being shut down.  How da hell am 
i supposed to do that?!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/18/1999 11:43:00 AM:Doug
I'm getting a 'Compile Error, 
User-Defined type not defined.'
I 
pasted the Dim Snd As CDAudio line into 
the General Declarations section in my 
form1.
Maybe I pasted the first two 
functions (the mci stuff) wrong? I 
created a module and pasted everything. 
Seemed simple enough. I must be missing 
something simple.
Thanks for any 
suggestions.
  Doug
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/20/1999 5:07:00 PM:mike devirgilio
I'm getting a 'Compile Error, 
User-Defined type not defined.' it 
doesn't recognize what Cdauido is how 
do i fix that
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/21/1999 4:37:00 AM:Storm
Phat Phreak Why dont you try using the 
registry to save your data, so its not 
lost after you reboot.  I would need to 
know what your doing in order to help 
you with your problem. Try this as an 
example.
1st you must create a new key 
in your system registry, I will email 
you correct syntax.  VB programer for 4 
years now 21 started 17 half or 18 , To 
all you vbprogramers remember greatness 
comes with time 
and paience. :)
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/21/1999 6:01:00 AM:Eric
Hey, can somebody be kind enough to 
tell
me why I can't set my snd as a 
CDAudio?
It gives me an error about 
component 
not existing or something 
like that...
If somebody can help me, 
please answer
Eric
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/21/1999 2:43:00 PM:Owen
Yeah, thats awesome that a 13 yr old is 
doin V.B.  I tryed C++ when i was 10, 
but i didnt quite get it! Im 12 now, 
and doing V.B
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/21/1999 9:23:00 PM:Duane Forster
Not picking on the little fella but why 
is this code so shifty?
No wonder why 
the stop click command freezez,it's got 
a huge loop in it(10000?????)
For the 
code to work as well, the "Dim Snd as 
CDAudio" at the start of the form and 
"Set.Snd = New CD" in the form load 
event has to be ommited 
Nice try 
though.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/22/1999 9:08:00 AM:Sped
I'm not picking on the little guy 
either
but, VB doesn't have a CDAduio 
choice when Dim-ing. Is there 
something that has to be with 
MSCDEX.dll file? please someone email 
with an answer
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/23/1999 12:15:00 PM:Slaya
When I try to run the player it tells 
me theres an error with the code and it 
highlights the FastFWD COMAND line.  
Any solution ideas??
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/23/1999 2:06:00 PM:12YROLDPROGGER
Hi,
   Good job with the player I 
just
have one error
Private Sub 
Form_Load()
    Set Snd = New 
CDAudio<--User-Defined Type not 
defined
Snd.ReadyDevice
End Sub
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/23/1999 4:16:00 PM:Mike Canejo
To all of yous that are 
having
problems with the source 
code,
please double check 
everything.
If that doesnt work, 
besure your 
using a 32bit Visual 
Basic, vb3.0 
and vb4 16bit wont work 
with this 
source code. If it still 
wont work, Email me at: 
NikeKing23@aol.com
and ill try/explain 
in detail on
whats wrong and how to 
fix it.
Thanks everyone!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/23/1999 6:57:00 PM:Slaya
when i try to run it, it says Ambiguous 
name detected: Form_load    how do i 
correct this???
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/24/1999 12:39:00 AM:Madwin
Hi Mike
You^r source code is verry 
good. I^m searched
a long time for 
some simmilar code, but i didn^t
find 
somewehre. I can only say :"Go so on" 
for your
future. But don't forget your 
school because it's
very important if 
you want later to have a nice
job by 
informatic szene.
I wish you the 
best , say goodbey and thank 
you.
with kindly regards Madwin
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/24/1999 10:36:00 AM:Chris
Hi all,
I too am getting a 
'User-defined type not defined' message 
from Form_Load, and no-one seems to 
have posted a definitive answer to that 
as yet. Have tried rem'ing the line 
that defines snd, but as expected that 
only voids all references to 'snd'.. 
any ideas? I checked for winmm.dll in 
my /win/system dir 
already..
Cheers,
Chris. A 
17-year old VB'er who should prolly be 
able to figure this one out!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/24/1999 9:22:00 PM:Alexander Corrado
There is a problem in the 
function
CheckCD() it doesn't return 
valid data
for the varible type 
(integer) so you
have to add right 
before the end of 
the
function:
CheckCD = 0
If 
Mid$(s, 1, 4) = "true" Then CheckCD = 1
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/25/1999 5:55:00 AM:Baard Haram
Hi Mike! Maybe you can help me? I have 
problems with printing out the contents 
of a listbox. Can you help me with 
that? Please help me, I`m desperate!!!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
4/27/1999 3:20:00 PM:The Fish
A few things about vb... first of all v 
c++ is a lot nicer once you learn how 
to use it but Im still using my vb 4 
which I've had since 7th grade :) 
Owell, the cd player is very nice good 
job
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/6/1999 4:08:00 PM:tupac (who else)
I need to know how to freaking make 
this work under vb5 any help?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/6/1999 6:41:00 PM:Harry
I'm a newbie to VB and i have been 
screwing around w/ it in the past few 
days.  I tried to make that CD Player 
and followed the directions, but i get 
the error "compile error, user 
def...bla bla bla" could someone help 
me? Thanks
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/7/1999 10:48:00 AM:Wayne Spangler
I think the major problem with the 
compile error is the created class
is 
not being named CDAudio. Change the 
name Class1 to CDAudio. Also I 
renamed the command button "Stop" to 
"cmdStop". Stop is a keyword and 
I 
don't normally use a keyword for 
controls.
This is a fine job Mike. I 
only wish they had computers when I was 
13.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/8/1999 2:53:00 PM:John Ryder
I'm having the same problem as 
everyone
else; I keep getting- 
"User-Defined Type not defined" I 
tried
to get it to work in Vb 4/32 and 
Vb 5. 
No one has posted a real 
solution.
Someone please help me.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/9/1999 1:30:00 AM:TGO
 Great Job on the CD Code. 
Didnt 
have it working at first But instead of 
pasting the Windows API/Global 
Declarations in a .BAS I pasted it in a 
Class Module and named it CDAudio and 
it works perfect.
Again Good Job.. 
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/11/1999 4:32:00 PM:I need help badly!
I'm a VB 5.0 user and I want to know 
how to make this work in it! HELP!!!!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/12/1999 1:11:00 AM:Lion Zabudkin
It's source code can play only one 
CDROM disk. How i can play CDROM disk 
in drive e: ? or f: ?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/12/1999 4:30:00 AM:Praetorian
Yo, PhatPhreak: Saving stuff to reload 
after a reboot/program restart is easy 
- use the 
registry, or slap another 
file somewhere - root dir's are good 
for that, or read some 
environment 
vars and store it in the windows dir 
itself.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/12/1999 4:47:00 AM:Kevin Grunewald
I would like to say very nice job. For 
a 13 year old you got yourself in the 
right direction. I mean I only started 
at 15 now a year later I can program in 
5 different languages and can hold my 
own in all. If ya stick to it ya got a 
head start on most of us :) Good Luck 
and Good Job!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/13/1999 7:47:00 PM:Mark Doering
Mike-
  It seems that a lot of people 
have been having problems with your 
code including myself.  I have been 
programming in VB for about a year and 
created several programs such as 
programs that detect trojan horse 
servers on your computer and an 
alpha-numeric paging console for my 
dad's paging company.  In all my 
programming(really not all that long) 
I've never seen someone as young as you 
making programs like this, good try but 
if you wanna really impress me you can 
tell me how I make the dang thing work. 
 I've run through the code with a fine 
toothed comb and I can't for the life 
of me figure out what I'm doing wrong 
or what you did wrond in your code.  
Please anyone(especialy Mike) e-mail me 
with how I can make this thing work in 
VB 5.0,  I'm looking forward to your 
responses and sorry this is sooo 
long.
            Sincerely,
     Mark Doering
               CEO 
Web Design Management
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/16/1999 10:52:00 AM:Lance

For only being 13 We all can see a 
good programing style emerging from 
you.. Nicely done code :c).. You should 
look into assembly language.. I'm sure 
youll like it and if u stick with it 
youll be 99% above all the others in 
the programing feild.... Keep On 
Programing, And I look Forward to 
seeing more Code from you in the 
future, As do most of us :c)  
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/16/1999 10:59:00 AM:Droby10
Not bad.  You are trying to load a bas 
mod as an instance of a 
class or 
object, though; which is throwing the 
type-not-def err.
The easiest fix on 
this is to leave the module as a bas 
mod and
simply remove any references 
to Snd or CDAudio; they are 
excessive.  Calling any of the 
functions in the module by name
alone 
should work.  That's the beauty of 
using any API...most
of the device 
handling work has already been done for 
you.
I would also check out 
documentation on naming 
conventions;
using ambiguous names 
will catch up with you sooner or 
later.
Keep up the work and don't be 
content with what you think 
you
know...there's always more.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/16/1999 1:06:00 PM:John
Yo, I tried using this and it says 
"user-defined not defined for the Dim 
Snd as CDAudio.  Please help me.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/16/1999 5:34:00 PM:Tyler
im only 12, i started programming in VB 
5.0 a couple weeks ago, before that i 
used QB, and i programmed HTML. 
Alright, i experimented with it and you 
have to put the Globals in a Class 
Module. It should work, just one 
?...What does the "Seconds" Text box 
do?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/18/1999 11:25:00 AM:t30od
Great code, except It needs to be able 
to change the track, which I fixed on 
mine but you should release it. 
Anyways, im 11, doin vb, c++, ect
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/29/1999 11:24:00 PM:Tyler
I am a newbie and i thought i could 
just
copy and paste this and say "hey 
i made a cd
player." I keep getting 
indentifier under cuser
is not 
recognized what does that mean.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/30/1999 1:09:00 PM:Dennis
Hey, Great little project for a 13 year 
old! Heck When I was 13 I was just 
getting into Assembly on a 
c64!!
ANyway, I have the major parts 
of the player working, execpt that I 
can not get it to sjip ahead or back a 
track? Or to display the seconds and 
track number.. Any help from ANYONE 
onthis is apprecated..
Thanks
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/31/1999 12:01:00 PM:The_Lung
Um thats all great n nice, but not 
everyone is mommy or daddys little rich 
kid to have a computer since 10 or 
whenever.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/2/1999 11:31:00 AM:bsuper
13 eh?  i can't imagine doing anything 
like this at that age...  i mean, i'm 
only 18, and i've only been working 
with vb for a couple of weeks, but 
still...  good job...
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/5/1999 7:24:00 PM:BMF
That is pretty good for 13...although 
im 13 too and I know about 7 
programming languages...all versions of 
VB....DirectX...MSVCPP...HTML...Java 
Script...Java...and im learing 
Shockwave...What upsets me the most 
about these source codes on this site 
is that there are so many people with 
controls for their source code..i mean 
come on...isn't the control enough 
source code...like an MP3 player 
control...Codec will make it work 
without a control...Whoops off topic 
again..well kid keep up the good work!!!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/6/1999 3:40:00 PM:Bill
Wow, great job for a 13 year old! I'm 
only 13 and i'm just getting into 
Visual Basic programming. One problem 
though, I'm having trouble with the Snd 
and CDAudio thingies, can anyone help?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/8/1999 6:07:00 AM:person 2000a
I'm 14years old.
Good Job Mike..
I 
started VB programming when I was 9 in 
VB2, At 11 went to VB4
Now have VB5
I 
am about Int. in VB and am 
stuck.
Can't get the next 
step...
Person.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/12/1999 9:00:00 AM:Austin 'Powers
I have just go into VB programming and 
am starting out making a CD player.  
I've used the MCI control but I can 
only seem to do a few things with it.  
I have 2 CD-rom  drives for mixing 
and want to play both at once.  I've 
seen some programs that let you choose 
the drive in a combo box and control 
the drive (Super Sonic for instance) 
without stopping the other. (Unlike 
Windows Cd player).  
Does anyone 
know how to control both drives.  I 
would be grateful to any help that 
anyone can give me
Cheers.
Austin 
UK 17.  
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/14/1999 4:33:00 AM:Flash
Iam the youngest of all U ( I think = 
12 uyear old )I need the answer to an 
question... WHAT NAME WILL THE 
MODULE/BAS HAVE TO BE??
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/14/1999 4:33:00 AM:Flash
ICQ 32334832
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/14/1999 11:08:00 AM:Eric
Since everyone is bragging about how 
young they are (or were) when they 
started programming vb (or whatever) I 
decided I would too.  I learned my 
first language BASIC in 7th grade and 
started learning other languages sortly 
after that.  I began with Vb when I was 
in 10th grade.  I am 17 now and still 
love VB!  By the way, nice job on the 
CD player!!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/21/1999 4:06:00 AM:Merlin ?
cheers the source code works lovely, 
but i only have one slight 
glich,
when i compile it to an exe , 
the exe runs but nothing is displayed 
on the screen and it just don't 
work,
any hints ?
cheers merlin ?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/24/1999 9:14:00 AM:PLEASE READ!!!
For all of you getting that problem- 
ambigious Form_Load, look over the code 
before you copy it, and notice that 
it has two form_loads, just dont copy 
one 
of them, other than that, dont 
just copy peoples code, try to 
understand it, so that you can fix your 
problems yourself.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/24/1999 10:23:00 AM:jon Boyce
Why is everyone bragging about how 
young they were, who cares, besides, if 
you know programming, it shouldnt 
matter how young you are. I went for a 
job at 17 knowing java, assemblers and 
vb, but i didnt get the job cause i was 
too young, so bugger it, the closer you 
are to respectable age, the more chance 
you have of getting a decent job. 
Anyway nice code, shame most of it is 
bad and could be improved. But what the 
hell youre only 13 after all
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/29/1999 3:57:00 AM:Adam Reed
Great Work.
Just one tip for latter 
programs Mike, It has been taught to me 
that it is always good to have 1/3 of 
your code as documentation. (' Bla bla 
bla). It helps you debug your code at a 
latter date and it helps other people 
that have a look at your code to 
understand what is going on and, fix 
any errors in the code.
It's just a 
suggestion but I think it is a good 
habit for you to get into.
Adam
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/29/1999 10:09:00 AM:KillRoyIII
If you think that writing some code at 
a young age is impressive then you are 
not only toung in age but young in real 
world experience. Don't miss 
undeerstand me, I think it's great that 
young people are getting involved, but 
in the real world; Shutting a customer 
down because you can't debug your own 
code or not complying with real time 
data issues can cost you a lot more 
than a few hit's on novice code. Don't 
get too full of yourself because you 
got something to work!. The real 
challenge beyond functioning code is 
Support, migration, upgrade, compliance 
monitoring, customer growth, etc. Good 
Luck!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/29/1999 6:22:00 PM:MISFITS
Well, I'll say that I started to really 
get into 
VB 2 months ago, and I'm 
really starting to like 
it.  I'm 14 
by the way.  If anyone wants to get 
VB6, you can get it on ebay.com for 
less than $60.
  You get it for the 
academic price.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/30/1999 7:45:00 AM:Richard Burns
Anyone know how to control the volume 
(Left/Right) as well, also has anyone 
figured out how to rip a cd using 
Digital Audio (AudioGrabber)
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
7/8/1999 9:22:00 AM:Steve
made a better CD Player download it 
at
http://softwarez.home.dhs.org
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
7/9/1999 11:55:00 AM:Yuta
I had some trouble getting this to 
work..but I think I finally got 
it...anyway..I learned my first 
prgraming language in 3rd 
grade..Turtle..then in 4rth I learned 
basic and have been programming ever 
since..well good job Mike...
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
7/16/1999 7:19:00 AM:heresy
honestly, i think that he's a great 
programmer.  yeah, everyone's 
impressed that
a 13 year old can do 
sucha thing.  but you
don't have to 
over do-it!  anyways, i'm 
not
bitching..  great coding mike.  
i'm a young
programmer too.  you 
should try the old basic
too 
(GW-Basic, QBasic, etc..) it's kinda 
cool
as well, but a little more 
difficult...
but makes nice viruses 
:-)
bye.heresy
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
7/17/1999 12:35:00 PM:Rofiq
Hi, I'm a new computing student. I have 
some question, where I can't print my 
record in VB. I've browsing so many 
books in library. But no one of them 
explain to me how to to print record in 
VB with header and diffrent orientation 
(Portrait/Landscape)same like in 
access. So if you don't mind please 
tell me how to print record in 
VB.
Thank You Very Much for your 
help.
Rofiq  
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/14/1999 4:47:00 AM:Kue
Hey,i keep gettin errors on the 
'CDAudio' part cuz i dont think there 
is a fuction.Did you leave somethin out 
or anything?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/15/1999 12:51:00 PM:kozmyc
Since everyone is saying how old they 
are, im 14 and have seen simmilar 
functions/codes, but putting them into 
the acual form and getting it to werk 
was difficult.  Thanx for the kode =]
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/18/1999 10:01:00 PM:Wacko
 it says user-defined type not defined 
at this part. Snd As CDAudio
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/31/1999 5:40:00 PM:Austin Agarwal
TO ALL OF YOU BRAGGERS: I am now 12 
(today is Augast 31, 1999) and know 
c++, visual c++, c, Java, xml, Basic, 
Visual Basic, acess, and oracle. now 
all of you people bragging either top 
this, or remove your freaking comments.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
9/9/1999 7:19:00 AM:SimonPeter
Just for you do better than me 
braggers, my dad is a programmer and 
he's the best. He taught me lots of 
stuff and I can code in ANY langauge. 
:p
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
9/9/1999 8:08:00 PM:Ryan
Can somebody mail me the code for an 
Unpause button for the cd player?  I 
would be very greatfull, and will add 
you to my credits list.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
10/23/1999 4:04:00 AM:snang
You people braggin on this message 
board, you are all immature.  I hope 
nobody thinks what you are saying is 
even close to the truth.  This isn't a 
forum about "Hey look at me, I am 4 and 
can code in 14 different languages, ooh 
look at me".  Stop the BS, it's 
annoying.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
11/24/1999 9:20:00 PM:Henry
 The problem
  ambiguous 
name...Solution: U Have to form_load 
subs, You have to change the name of 
one of them as form_unload(cancel as 
integer) 
Problem: User-defined type 
not defined
Solution: You have to call 
the ClassModule as CDAudio. Thats it.
Well now My problem: 
  Bad DLL 
calling convention
If you can help me. 
I would apreciate it: 
Henryra@hotmail.com 
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
11/26/1999 10:44:00 PM:12 Year Old Kid
Hey I'm 12 years old and I know these 
languages:
Java,Javascript,CGI/PERL,Vis
ual Basic,C+/C++,Access,xml,HTML(Not 
really a language) and more....
so 
beat that Austin Agarwal 
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
1/9/2000 10:06:23 PM:Randy Mcdowell
So what, I am 14 and I am Microsoft 
Certified in Microsoft C++, DJGPP, 
Visual C++, Microsoft Assembler, 
Microsoft QuickBasic, Microsoft 
GW-Basic, Microsoft Word, Microsoft 
Access, and Microsoft Project. hehe...I 
never thought VB would be this much 
different than C++ and QuickBasic, you 
can't even use assembly routines. 
Anywayz, stop bragging, we are all here 
to help each other, and that can be a 
good thing if we let it :-) So don't 
brag about your programming skills if 
you can't use them for anything but to 
show off!!!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
1/20/2000 4:50:01 PM:Kazuya
I am 13 too... I have learned 
rwx,java,javascript,c,c++,basic,visual 
basic, and html I also teach some of 
those lanuages. P.S. just cant spell 
very well lol
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
2/1/2000 11:46:06 PM:Ummmmm
Ahhhh..y'all are freaks ;o), 13 and 
doing programming already..hehe..don't 
mind me, i'm just a little bit jealous 
;o)..I don't have that chance like you 
guys have, learning English is a great 
task for me already ;o).. Anyway, very 
nice coding Mike...blah blah blah..
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
2/7/2000 4:38:21 PM:Angel From Hell
Hey,everyone I got the code to work but 
there is one problem. Specifically that 
each time itI hit the "Stop" button my 
computer freezes. Any chance that this 
has happen to anyone else. Or does my 
computer suck?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/14/2000 8:36:23 PM:Traged,
Not a bad piece of code, I was 
wonderingIf there has been any work on 
audio-equilizer code, or led display 
(like on winamp)code. Any links to this 
type of code would be a big help.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
5/14/2000 8:41:17 PM:Traged
Not a bad piece of code,
I was 
wondering if anyone had done any work 
on adding an eq(equilizer)and/or a led 
display like on winamp? 
Any 
suggestions or links to that type of 
code would be appreciated. :)
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
6/20/2000 10:55:33 AM:Jeremy
Hey im getten a runtime 
error'424':object required,then 
highlights wat im tryen to do.so if i 
click the play button the error puts up 
then highlights Snd.SeekCDtoX 
Val(tracknumber)in yellow.someone 
please email me wat i should do 
ppppleeeease
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
7/17/2000 9:56:20 PM:Randy Porosky
God Dang Everyone Brags on this board, 
Anyway I figured this out in 2min and 
to fix the "user-defined type not 
defined Snd As CDAudio" error Just 
rename the Class Module To 
CDAudio
See Ya.
-Randy
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/14/2000 3:50:27 PM:Grrr Adams
hmm
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/14/2000 3:50:57 PM:Grrr Adams
Why are u guys so amazed at a 13yr old 
VB programmer but not a 14yr old who 
does multiple languages? this 13 year 
old is probably just a few days away 
from his 14th birthday (because the 
person at the top of this board said 
the person who made this prog was 13 
and that he was 14 and they were both 
in the same year at school, so go 
figure)
to be honest if i had to 
rate this program it would give a good 
if taking age into consideration, but 
ignoring the age factor this program, 
to be honest, can't even be run without 
being altered by the user, and the 
coding could be better.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/14/2000 3:53:05 PM:Grr Adams
ps) i am disgraced at how many people 
have turned this message board into 
garbage by rambling on about how young 
you were when you started VB and how 
many languages you do... who cares? 
and for the record i am only 14 
myself and i will not tell you what 
languages i program in or when i 
started like some other lamer did, 
having the nerve to critisise others 
and telling them not to brag while he 
himself stated everything about 
him.
the person who made this cd 
player wants ideas, not a biography on 
you.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
9/13/2000 4:42:55 PM:Zerosk8er
Nice work. I am 13, and i have been 
programming VB for about 2 years. I 
have also just started C++.. For those 
of you that dont know, you need to 
rename the Class file to CDaudio.. 
also, i added a volume control and 
track controls, and i made a simple 
playlist. You should post that, or 
maybe if i get time i will.. anyways 
good work!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
9/13/2000 5:08:50 PM:Deftonesk8punk
Hey again, (i am Zerosk8er). Just 
thought i would tell you that to get 
the stop command, erase what he has for 
the code under Stop_Click.. and just 
put snd.stopplay that should work, and 
its alot easier than what he had.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
9/27/2000 5:31:38 PM:no-one
nothing original 2 say. kewl code, your 
13 bla bla bla etc etc. Well I'm 2 and 
a half, and I wrote the bible so fu all.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
10/1/2000 8:18:52 AM:Da Man!
Hewwo I am 4 yearz old, and I can code 
in SuperSonicVisual Z++ and XYZHTML, 
bead that! one prob, I zeem to get alot 
of syntacks errrors, ne1 know why 
???
helllp!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
10/1/2000 8:22:32 AM:Da Boy!
Hewwo every1, I am 4 years old, and I 
can programme in SuperDuperSonice 
Visual Z++, and xyzHTML, I wrote and 
sold Office 20000 to microsoved, and I 
am working on missile guidance systems 
for the United Common wealth of the 
North Pole for Santa.. only one 
prodblemm, I zeem to gett lots of 
zyntacks errrors and I cant under stand 
why? any help is 
unappreciated!
thanks a gazillion!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
10/15/2000 3:59:06 PM:dijks425@planet.nl
Please E-mail me back soon, I have A 
realy urgent question for you. How can 
I play one track and when the track has 
finist playing stop the player???
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
11/3/2000 8:52:53 PM:Crash
Hi, i am 13 and i know these languages: 
VB(some), cgi, html, asp, php, java, 
and QBasic.
I am having a problem 
with this program. When i hit stop 
while playing a cd, it makes the 
program freeze, if you know why it does 
this, please help. Oh and the close 
tray command doesnt work.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
11/8/2000 10:26:11 PM:Whiteknight
Hey guys I enabled you to be bale to 
close and open the cd tray with ONE 
button instead of two.  Change the 
caption on the close tray button to 
close/open tray and add the following 
code under the private sub 
closetray_click()
if snd.closecd=true 
then snd.ejectcd
if snd.ejectcd=true 
then snd.closecd
Easy huh?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
12/8/2000 6:22:08 PM:Feet
To all the people freakin' out about 
the ambigious name detected: Form_Load, 
it's becuz u have 2 form load subz and 
the one u copied form this should go in 
the REAL form_load that comez with the 
form, do not put the dang form_load sub 
he gave in the declerations.
anywayz, 
this is pretty nice!
-Feet
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
12/11/2000 6:42:24 PM:Feet
Hey Mike, i have a question about the 
cd-player at psc that you 
posted.
All of the cd-player is 
nice, but it gives me a type-mismatch 
error for the GetNumTracks function. It 
highlights the GetNumTracks = 
cint(Mid$(s, 1, 2))
or cind, whatever. 
Why is this?
Thanx,
Feet
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
Add Your Feedback!
Note:Not only will your feedback be posted, but an email will be sent to the code's author in your name.

NOTICE: The author of this code has been kind enough to share it with you.  If you have a criticism, please state it politely or it will be deleted.

For feedback not related to this particular code, please click here.
 
Name:
Comment:

 

Categories | Articles and Tutorials | Advanced Search | Recommended Reading | Upload | Newest Code | Code of the Month | Code of the Day | All Time Hall of Fame | Coding Contest | Search for a job | Post a Job | Ask a Pro Discussion Forum | Live Chat | Feedback | Customize | Visual Basic Home | Site Home | Other Sites | About the Site | Feedback | Link to the Site | Awards | Advertising | Privacy

Copyright© 1997 by Exhedra Solutions, Inc. All Rights Reserved.  By using this site you agree to its Terms and Conditions.  Planet Source Code (tm) and the phrase "Dream It. Code It" (tm) are trademarks of Exhedra Solutions, Inc.