关于Shockwave flash的问题

Question

我想用一个flash控件播放flash文件，
Private Sub Form_Load()
ShockwaveFlash1.Movie = "C:\Documents and Settings\Administrator\桌面\project\OCX\44442.swf"
End Sub
如果我想写成相对地址的话，应该怎样写呢？("\project\OCX\44442.swf")

Answer 1

ShockwaveFlash1.Movie = app.path & "..\OCX\44442.swf"

Answer 2

这个要看你的程序文件在文件夹中如何组织了如果
project\source\*.vbp
project\ocx\*.swfShockwaveFlash1.Movie = app.path & "..\OCX\44442.swf"如果
project\*.vbp
project\ocx\*.swfShockwaveFlash1.Movie = app.path & "\OCX\44442.swf"

Answer 3

用上面的方法根本运行不了，我有试过，所以才问的，应该不是简单的只应用APP.path

Answer 4

如果你的flash文件在你的应用程序文件夹内（或者子文件夹内），可以用相对路径；否则，必须用绝对路径。例如：exer所在路径是：d:\youapplication，而flash文件所在路径是d:\youapplication\flash
则：ShockwaveFlash1.Movie =app.path &"\flash\44442.swf"

Answer 5

 flash_Game.LoadMovie 0, App.Path & "\魔塔.swf"
app.path 没有错，错的是你用的参数，请参照以上语句。

Answer 6

设置shockwaveflash控件属性base的位置，即可。