OptionExplicit
Functionaction
DimVideoApp,FilePath
SetVideoApp=CreateObject("WscrIPt.shell")
FilePath="C:\Project\t.wma"
VideoApp.RUN"""C:\ProgramFilES\WindowsMediaPlayer\wmplayer.exe"""+FilePath,1
EndFunction
这是打开播放器并播放文件,请问如何关闭这个播放器呢,用VBS脚本和外部变量触发
最佳答案
最简单的就是自己手动关闭WINDOWS播放器了,如果用脚本那么你需要有扎实的VBS基础和WINDOWS编程基础了。
你用这个试试
DimVideoApp
SetVideoApp=CreateObject("Wscript.shell")
VideoApp.run"cmd.exe/ctASkkill/f/imwmplayer.exe/t",0
这样通过间接调用CMD来执行一个taskkill的命令。
你可以了解下Wscript.shell的用法吧,百度下,包你有满意的结果。
提问者对于答案的评价:
多谢