设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1169|回复: 6
打印 上一主题 下一主题

[Access本身] Access如何播放视频

[复制链接]

点击这里给我发消息

跳转到指定楼层
1#
发表于 2008-3-7 21:00:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
提示: 作者被禁止或删除 内容自动屏蔽
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2008-3-7 21:34:27 | 只看该作者
關注下,ACCESS可以播放視頻!!第一次聽說
3#
发表于 2008-3-7 22:29:59 | 只看该作者
调用Windows Media Player应该可以
4#
发表于 2008-3-7 22:33:29 | 只看该作者
下面用ShellExecute调用Windows Media Player 播放mp3的方法
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

'lpOperation可用参数:open、print、find、explore、edit

'nShowCmd参数 窗口模式类型声明
Private Const SW_HIDE = 0
Private Const SW_SHOWNORMAL = 1
Private Const SW_SHOWMINIMIZED = 2
Private Const SW_SHOWMAXIMIZED = 3
Private Const SW_SHOWNOACTIVATE = 4
Private Const SW_SHOW = 5
Private Const SW_MINIMIZE = 6
Private Const SW_SHOWMINNOACTIVE = 7
Private Const SW_SHOWNA = 8
Private Const SW_RESTORE = 9



Private Sub Command0_Click()
ShellExecute Me.hwnd, "open", "dj-我说我爱你dj版.mp3", "", "D:\KUGOO", SW_HIDE

End Sub

点击这里给我发消息

5#
发表于 2008-3-7 23:14:06 | 只看该作者
andymark兄的API 是用得出神入化了!
6#
发表于 2008-12-5 16:53:01 | 只看该作者

学习!!!

学习!!!
7#
发表于 2008-12-5 20:47:13 | 只看该作者
[:24] 学习!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-9-28 11:12 , Processed in 0.099118 second(s), 31 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表