Are there any MS Access boffins here?
Are there any MS Access boffins here?
Author
Discussion

police state

Original Poster:

4,380 posts

251 months

Wednesday 21st February 2007
quotequote all
I've tried all the techie forums, so...

maybe a long shot, but...

Does anyone know how to link the Shockwave/Flash ActiveX control to a table field in MS Access 2003

The control itself only has these properties for the Data property:

OLE Class: Shockwave Flash Object
Class: ShockwaveFlash.ShockwaveFlash.1
Enabled: Yes

I have this on the 'On event' Property for the form:

Private Sub obj_flashmovie_Enter()
Me.obj_flashmovie.Movie = Application.CurrentProject.Path + "\DataTest.swf"
End Sub

but this is always assuming that the flash file is in the same directory as the Access .Mdb

what i really want is for the table to reference where the Flashfile is; for example:

D:\database\Flashfiles\test.swf

very irritating that between them, Micosoft/Adobe/Macromedia couldn't put a native data control on the ActiveX object...



tigger1

8,478 posts

252 months

Wednesday 21st February 2007
quotequote all
Not a wiz - and maybe I'm being dumb (VBA isn't my strongest area...!): -

But couldn'y you have: -

Private Sub obj_flashmovie_Enter()
Me.obj_flashmovie.Movie = _ D:databaseFlashfiles est.swf
End Sub

instead? Just remove the "current application path" bit?

police state

Original Poster:

4,380 posts

251 months

Wednesday 21st February 2007
quotequote all
tigger1 said:
Not a wiz - and maybe I'm being dumb (VBA isn't my strongest area...!): -

But couldn'y you have: -

Private Sub obj_flashmovie_Enter()
Me.obj_flashmovie.Movie = _ D:databaseFlashfiles est.swf
End Sub

instead? Just remove the "current application path" bit?



Yes Tigger, that will work, but what i really want is to be able to put the filepathfilename into a table, that way, I don't have to hand code every file location.

If I had them in a table, i could link to a form and let the user ammend/update when and how they wish to.

however, thanks for the reply, it's appreciated.

police state

Original Poster:

4,380 posts

251 months

Wednesday 21st February 2007
quotequote all
police state said:
tigger1 said:
Not a wiz - and maybe I'm being dumb (VBA isn't my strongest area...!): -

But couldn'y you have: -

Private Sub obj_flashmovie_Enter()
Me.obj_flashmovie.Movie = _ D:databaseFlashfiles est.swf
End Sub

instead? Just remove the "current application path" bit?



Yes Tigger, that will work, but what i really want is to be able to put the filepathfilename into a table, that way, I don't have to hand code every file location.

If I had them in a table, i could link to a form and let the user ammend/update when and how they wish to.

however, thanks for the reply, it's appreciated.




I have sorted it now.

case closed.