使用Shockwave Flash object

1、安装Flashplayer 10以上的版本（尽量是最新的）

 

2、开始——运行——regsvr32 jscript.dll

 

3、开始——运行——regsvr32 vbscript.dll

 

4、在COM组件中添加shockwave Flash object与Microsoft Common Dialog Control，version 6.0

 

5、 添加代码：

            ShockwaveFlash1.Width = 1024;
            ShockwaveFlash1.Height = 768;
            ShockwaveFlash1.Left = 0;
            ShockwaveFlash1.Top = 0;
            ShockwaveFlash1.Movie = "E://1229_V1.swf";