会员登录 - 用户注册 - 网站地图 Office中国(office-cn.net),专业Office论坛
当前位置:主页 > 技巧 > Access技巧 > API > 正文

Access利用api实现打开/关闭光驱

时间:2013-11-13 17:44 来源:office中国 作者:大熊 阅读:
       再次分享一个API函数,API函数有很多对我们操作系统有很大的帮助,这个是打开/关闭光驱的函数

1、新建一个模块,把下面的代码粘贴到模块中。
Declare Sub mciSendStringA Lib "winmm.dll" (ByVal lpstrCommand As String, ByVal lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal hwndCallback As Long)



2.调用函数,直接调用下面的代码即可使用
'打开光驱

'mciSendStringA "Set CDAudio Door Open", 0&, 0, 0

'关闭光驱

'mciSendStringA "Set CDAudio Door Closed", 0&, 0, 0




(责任编辑:admin)

顶一下
(2)
100%
踩一下
(0)
0%
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价: