shockwaveflash1.movie解决思路

shockwaveflash1.movie
vb通过控件调用SWF，
shockwaveflash1.movie="xxx.swf"
如果判断是否加载成功？
如：xxx.swf文件不存在时。

别说用我的眼看动画是否显示。。
我要的是代码判断。。。

[解决办法]

VB code

If Dir$(vFile) <> "" Thenshockwaveflash1.movie="xxx.swf" ElseMsgbox"文件不存在!"End If
[解决办法]
这个很简单，你随便加载一个不存在的文件，看看会发生什么错误，看错误号是多少，然后捕捉这个VB错误，然后加以处理！
[解决办法]
加一句vFile="xxx.swf"