当前位置: 主页 > PLC控制

各位高手节日快乐,letham大师 2014最后一问

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的用法吧,百度下,包你有满意的结果。

提问者对于答案的评价:
多谢

  • 关注微信

猜你喜欢

微信公众号