[AccessD] Embedding a WAV file

Hi Rocky
Demo Sent off line

Anyone else want a demo?
Send an email OFF LIST to d.dick at uws.edu.au
 
See ya

DD

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin -
Beach Access Software
Sent: Thursday, 3 March 2005 4:25 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Embedding a WAV file

Darren:

When I do the installable run-time I think I can include my WAV file and it
will be transparent to the user. For beta testing I need to send them just
one file.  So I'm still looking for a way to do this.

I did insert-->Object-->from file and inserted the wav file in an Unbound
Object Frame.  But getting it to play in the On Click events of other
controls, like command buttons, is the next problem.  And then, I would
probably have to insert this UOF in every form.

Is there maybe a way of putting it into a field in a table and running it
from there so it could be run from any form?

TIA

Rocky Smolin
Beach Access Software
http://www.e-z-mrp.com
858-259-4334

----- Original Message -----
From: "Darren DICK" <d.dick at uws.edu.au>
To: "'Access Developers discussion and problem solving'" 
<accessd at databaseadvisors.com>
Sent: Tuesday, March 01, 2005 5:18 PM
Subject: RE: [AccessD] Embedding a WAV file


> Hi Rocky
> I have a folder in the App home folder for sounds. Also one for Images and
> Skins etc
> EG
> C:\Program Files\My app will be the 'home' folder
> And in it will be
> C:\Program Files\My app\Sounds (About 5 or 6 files in here)
> C:\Program Files\My app\Images (3 more folders and about 20 files in here)
> C:\Program Files\My app\Skins (1 folder (but it can grow) and many files 
> in
> here)
>
> I install them when I install the app.
> They are my 'standard' folders and files and go with every app.
> And I refer to them now by heart with lines like
> (I actually use globals for the length of the session But can be done at a
> form Sub level just as easy)
> EG
> Dim strSkinToUse as String
> Dim strSkinFolder as String
> Dim strImagesFolder as String
>
> strSkinToUse = Dlookup("[SkinName]","tblOptions")
> strSkinFolder = Left(CurrentDb.Name, Len(CurrentDb.Name) -
> Len(Dir(CurrentDb.Name)) - 1) & "\Skins\" & strSkinToUse
> strImagesFolder= Left(CurrentDb.Name, Len(CurrentDb.Name) -
> Len(Dir(CurrentDb.Name)) - 1) & "\Images"
> strSoundsFolder= Left(CurrentDb.Name, Len(CurrentDb.Name) -
> Len(Dir(CurrentDb.Name)) - 1) & "\Sounds"
>
> Then I refer to each skin component like.....('Cause I know 'em off by
> heart)
>
> Me.picture =  strSkinFolder  & "\Background.jpg"
> Me.imgMyLogo = strImagesFolder & "\OurLogo.jpg"
>
> I use the API code "PlaySound" for Playing Sounds
> Eg
> Private Sub Form_Load()
> PlaySound (strSoundsFolder & "\Logon.wav")
> End sub
>
> It works and is pretty simple.
>
> HTH
>
> See ya
>
> Darren
>
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com