用flash动画控制PPT幻灯片

gasx2007 发表于: 2008-4-30 08:06 来源: 扑奔PPT网

gasx2007 发表于 2008-4-30 08:10:15

我这里发不上贴图，请哪位朋友帮忙发上。

oopppig 发表于 2008-4-30 08:21:39

:$ :$

房主~~~，我没弄出来哎

宏的安全性也调整了啊~~~~

不过也许是版本的问题，我的是2007~~~~~

希望其他人能实现，发个图吧，o(∩_∩)o...

:$ :$

[ 本帖最后由 oopppig 于 2008-4-30 08:22 编辑 ]

未命名.JPG

未命名2.JPG

未命名.JPG

未命名2.JPG

oopppig 发表于 2008-4-30 08:23:37

第一次发的不太好，不要介意啊，大家~~~o(∩_∩)o...

:P :P

gasx2007 发表于 2008-4-30 08:31:48

如果是Flash9f.ocx控件，可能实现不了，目前正在寻找原因。你可以看一下你的目录：C:\WINDOWS\system32\Macromed\Flash。其中如果有flash9f.ocx，那么它就是你使用的flash控件，可能现在不会有反应。用regsvr32 flash9f.ocx -u 取消它的注册信息。再安将其他的版本。

k111791k 发表于 2008-4-30 09:10:16

♀♀ 我会一直努力的 ♀♀

amwyq 发表于 2008-4-30 09:41:15

首先感谢楼主的不吝赐教。
同样是你说的问题，所以不能实现。
还有个问题是：你在PPT代码编辑器中加了密，我无法看到代码。。。

 

amwyq 发表于 2008-4-30 09:45:47

期待着楼主能尽快帮助大家解决这个难题。。。
代表我和想学接口技术的朋友谢谢楼主！

gasx2007 发表于 2008-4-30 10:10:38

你首先在VBA编辑器的对象浏览器中找到ShockwaveFlashObjects对象，在底部的窗格中可以看到：
Library ShockwaveFlashObjects
    C:\WINDOWS\system32\Macromed\Flash\flash8.ocx '这就是所要用到的控件。
    Shockwave Flash
如果无法看到我所发文件的效果，可以删除文件中的控件，再重新插入，设置好属性，编写代码实现跳转功能。

amwyq 发表于 2008-4-30 10:55:39

没有属性和代码值还是一句空话啊？
有人会吗？帮帮我啊！
55555......

[ 本帖最后由 amwyq 于 2008-4-30 11:04 编辑 ]

liangliqiang 发表于 2008-4-30 12:26:27

想学习却无从下手，也只能去买书学了。

我是谁 发表于 2008-5-01 10:46:00

看来gasx2007也是一知半解，根本没什么效果。。。大家别听他胡说了。。。

sunyi2007 发表于 2008-5-01 14:24:19

没有效果
没有效果
没有效果
没有效果
没有效果

sunyi2007 发表于 2008-5-01 14:28:30

应该可以的,不过楼主好象不是很愿意说,只是说些皮毛,没有说最关键的.编写代码实现跳转功能.

sunyi2007 发表于 2008-5-03 17:29:19

我感觉楼主说的什么知识产权保护,纯属吓拜,这点知识还能设计到知识产权?到扑奔都是互相学习来着,你说的效果很难让人信服.
1、到现在下载的朋友没有一个看到效果的。
2、代码也看不到。
有可能是可以有效果，楼主不是很懂，对知识一知半解。在一种解释就是在忽悠。

gasx2007 发表于 2008-5-04 09:00:06

由于5.1假期，几天没有上网，各位朋友实在抱歉。
至于各位提到：没有看到效果，这不是我的原因，而是你的Flash控件的原因。9.0及之后的版本对PowerPoint的支持不够友好，这主要是Flash加强了安全方面的设置，导致了从Flash传递过来的命令被阻止。但8.0及之前的版本对PowerPoint的支持是非常友好的，（注：8.0对PowePoint母版的支持不好，会产生错误，而8.0之前的版本对母版的支持很好）。如果你想看到效果，可以先卸载9.0及之后的版本，安装8.0的版本，本人经过多机测试是成功的。至于9.0版本的问题，我正在测试中。
下面提供Flash8.0控件安装程序。
希望各位朋友能成功看到效果。

834 KB, 下载次数: 143)

gasx2007 发表于 2008-5-04 09:36:18

有些朋友在发些牢骚，说些轻率的话语，这有什么意思呢？不管你的知识有多么丰富，在知识的海洋中，连牛顿这样的科学家都认为自己是一个在海边寻找贝壳的人，何况我们这些人？
用Flash动画来控制幻灯片不是我本人创造的，我并没有什么炫耀之意，或许也正如朋友们所说是一知半解，但这又有什么过错？学习别人的东西总得有个一知半解的过程。而我们要做的是尊重别人的创造。否则人人都拿别人的东西来加一点修改当作自己的东西而得意，这实在是非常的可怜了。
如果有10个以上的朋友认为我应当公开代码，我会公开的。代码只有十多行，关键是你有没有看到效果，如果看到了效果，代码对你才有作用。

cooldla 发表于 2008-5-05 10:15:00

這個小插件很使用呀！非常謝謝1

龙2 发表于 2008-5-06 01:36:56

谢谢分享，下了回帖个先

lcyjxjs 发表于 2008-5-06 23:00:09

我们用的计算机软件，有多少是交费过的呢？
全世界的资源应该是共享的，何况我们是一个国家的人呢！
我把楼主的代码公开一下，大家看看！
vba密码是
奶奶的Error!
Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)
Select Case command
Case "gotoa"
    PowerPoint.ActivePresentation.SlideShowWindow.View.GotoSlide 2
Case "gotob"
    PowerPoint.ActivePresentation.SlideShowWindow.View.GotoSlide 3
Case "gotoc"
    PowerPoint.ActivePresentation.SlideShowWindow.View.GotoSlide 4
Case "gotod"
    PowerPoint.ActivePresentation.SlideShowWindow.View.GotoSlide 5
Case "gotoe"
    PowerPoint.ActivePresentation.SlideShowWindow.View.GotoSlide 6
Case Else
    MsgBox "奶奶的Error!"
End Select
End Sub

楼主已经把使用方法告诉我们了，把插件换了，就可以了！
感谢楼主的创意！

[ 本帖最后由 lcyjxjs 于 2008-5-7 22:52 编辑 ]

lcyjxjs 发表于 2008-5-06 23:14:45

谢谢，你是真诚的，我试验成功了，其他人不成功，不怪你，只怪............................