为 flashvars 属性设置值不起作用
当使用 vba 将 shockwave flash 影片插入 PowerPoint 2010 时,我尝试设置属性 FlashVars 的值,如下所示:
Dim s As Shape
Set s = ActivePresentation.Slides(1).Shapes.AddOLEObject(0, 0, -1, -1, ClassName:="ShockwaveFlash.ShockwaveFlash")
With s.OLEFormat.Object
.FlashVars = "parm1 = val1"
.EmbedMovie = True
.Movie = "D:\Samples\test.swf"
End With
但是,在执行设置命令 (s.OLEFormat.Object.FlashVars = "parm1 = val1" ) 后, FlashVars 保持为空。你对这种奇怪的行为有什么想法吗?
谢谢,
I'm trying to set value to the property FlashVars when inserting shockwave flash movie to PowerPoint 2010 using vba like this:
Dim s As Shape
Set s = ActivePresentation.Slides(1).Shapes.AddOLEObject(0, 0, -1, -1, ClassName:="ShockwaveFlash.ShockwaveFlash")
With s.OLEFormat.Object
.FlashVars = "parm1 = val1"
.EmbedMovie = True
.Movie = "D:\Samples\test.swf"
End With
However, after executing the setting command (s.OLEFormat.Object.FlashVars = "parm1 = val1" ), the value of FlashVars remains empty. Do you have any idea about this weird behavior ?
Thanks,
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(1)
我不知道以这种方式嵌入 Flash,但在浏览器中,定义 FlashVars 对象的另一种方法是将变量附加到 SWF 文件名。如果没有找到合适的解决方案,这可能值得一试。
I have no idea about embedding Flash in this fashion, but in the browser an alternative to defining a FlashVars object can be to append the variables to the SWF file name. That might be worth a try if a proper solution does not present itself.