用VB如何实现播放电影文件?

我们平时在局域网中播放电影时是这样操作的:
1.打开播放器(比如Real one player)
2.使用文件,打开,找到电影文件(比如网络共享路径\\server\movies\XXX\01.rmvb)
3.确定后,播放器会自动播放该电影.那么,我想问的是,这个过程如何在VB中用程序实现?
目的请参见另一个贴子:
http://community.csdn.net/Expert/topic/4140/4140203.xml?temp=3.370303E-02

解决方案 »

  1.   

    你的问题令人费解，我讲一下我的理解和方法吧根据你的情况如果是自己玩的话，我来扯几句。
    我的方法不用数据库，直接就是HTM文件
        首先你有IIS，那么建立一个或多个HTM（HTML）文件，这个文就是包含有你的多媒体文件的路径和信息，这个文件不要包含那些垃圾的HTM语言的标识信息就是也个TXT文件一直改个扩展名
        下面用VB就可以简单实现了，，直接用Inet1读取网页的源代码，然后简单处理一下就到本地了，然后将这些信息倒入一个LIST，不就有播放路径了么。
        有了播放路径，然后用ShellExecute应该就可以实现调用本地合适的播放器来播放了。不过我怎么感觉你的问题题目 “用VB如何实现播放电影文件”象是问用VB实现播放器的问题……
      

  2.   

    shell “你所用的播放软件”捕捉这个软件父窗体的句柄。如用findwidow() API函数取得句柄GetWindowText(）获得你要操作的按钮如“打开”等PostMessage hwnd, WM_KEYDOWN, VK_RETURN, 0 ’发送你要的命令如回车一切搞定：）
      

  3.   

    谢谢
    我的QQ是:19492736
    或者请发邮件到[email protected]
      

  4.   

    ShellExecute不就可以令系统帮助我们自动寻找适合的播放器了么？？？？令人费解的问题！！！！
      

  5.   

    嗯,非常感谢lamDeane的指点
    已成功就是要实现这个效果!谢谢!
      

  6.   

    添加“WindowsMediaPlayer”控件，装上暴风影音做解码器，这样WindowsMediaPlayer可以播放多种格式的文件
    WindowsMediaPlayer1.url="c:\aa.rmvb"