以前手机qq空间的游戏:使用VB的API函数错误

来源:百度文库 编辑:高考问答 时间:2024/05/03 21:43:44
这是一个多媒体播放器的部分代码
'Play all types of files here
Set MediaControl = New FilgraphManager
If MediaControl Is Nothing Then MsgBox "Cannot create the IMediaControl object": Exit Sub
Set MediaPosition = MediaControl
Set BasicAudio = MediaControl
MediaControl.RenderFile (SongPath)
If InternetFile = True Then
SongLen = 0
Else
MediaPosition.CurrentPosition = 0
MediaPosition.Rate = 0.5 + Sli(5).V
SongLen = MediaPosition.Duration
End If
MediaControl.Run '<<<< start playing NOW!
End Select
在我自己的机上运行没问题的,但在其他机就提示 MediaControl.RenderFile (SongPath)出错
请问 wangtk1982 SongPath的值在什么地方设的?
都是RenderFile方法

SongPath的值对吗?还有你的FilgraphManager 是什么版本?两个机器一样吗?都是RenderFile方法吗?