|
eech
高级用户
   
积分 906
发帖 346
注册 2006-7-10
状态 离线
|
『楼 主』:
求关闭光驱的批处理.不知有没有
使用 LLM 解释/回答一下
mshta "javascript:new ActiveXObject('WMPlayer.OCX').cdromCollection.Item(0).Eject();window.close();"
这是联盟的一位大虾写的弹出光驱的批处理.配上快捷键.超爽.但不足的是没有关闭光驱的批处理.
请教各位大虾.在不用软件的前提下.
有没有关闭光驱的批处理
|
|
2006-12-10 08:28 |
|
|
lxmxn
版主
       
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
『第 2 楼』:
使用 LLM 解释/回答一下
下面是VBS的,可以转换成批处理。
With CreateObject("WMPlayer.OCX.7").cdromCollection
.Item(0).eject
WScript.echo "光驱已经打开"&vbcrlf&"单击确定关闭光驱"
.Item(0).eject
End With
Last edited by lxmxn on 2006-12-10 at 08:50 AM ]
|
|
2006-12-10 08:49 |
|
|
eech
高级用户
   
积分 906
发帖 346
注册 2006-7-10
状态 离线
|
|
2006-12-10 09:11 |
|
|
electronixtar
铂金会员
      
积分 7493
发帖 2672
注册 2005-9-2
状态 离线
|
『第 4 楼』:
使用 LLM 解释/回答一下
霏凡是什么啊?
|

C:\>BLOG http://initiative.yo2.cn/
C:\>hh.exe ntcmds.chm::/ntcmds.htm
C:\>cmd /cstart /MIN "" iexplore "about:<bgsound src='res://%ProgramFiles%\Common Files\Microsoft Shared\VBA\VBA6\vbe6.dll/10/5432'>" |
|
2006-12-10 09:32 |
|
|
vkill
金牌会员
     
积分 4103
发帖 1744
注册 2006-1-20 来自 甘肃.临泽
状态 离线
|
『第 5 楼』:
使用 LLM 解释/回答一下
Originally posted by electronixtar at 2006-12-10 09:32:
霏凡是什么啊?
论坛
|
|
2006-12-10 10:45 |
|
|
eech
高级用户
   
积分 906
发帖 346
注册 2006-7-10
状态 离线
|
『第 6 楼』:
如何将这个VBS转BAT
使用 LLM 解释/回答一下
With CreateObject("WMPlayer.OCX.7").cdromCollection
.Item(0).eject
WScript.echo "光驱已经打开"&vbcrlf&"单击确定关闭光驱"
.Item(0).eject
End With
哪位大虾行行好.教我如何转这个VBS文件转成批处理
Last edited by eech on 2006-12-10 at 12:01 PM ]
|
|
2006-12-10 12:00 |
|
|
lxmxn
版主
       
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
『第 7 楼』:
使用 LLM 解释/回答一下
@echo off
echo With CreateObject("WMPlayer.OCX.7").cdromCollection>tem.vbs
echo .Item(0).eject>>tem.vbs
echo msgbox "光驱已经打开"^&vbcrlf^&"单击确定关闭光驱">>tem.vbs
echo .Item(0).eject>>tem.vbs
echo End With>>tem.vbs
cscript.exe //H:wscript //nologo tem.vbs
del tem.vbs
Last edited by lxmxn on 2006-12-10 at 12:41 PM ]
|
|
2006-12-10 12:09 |
|
|
youxi01
高级用户
   
积分 846
发帖 247
注册 2006-10-27 来自 湖南==》广东
状态 离线
|
『第 8 楼』:
使用 LLM 解释/回答一下
::On Error Resume Next
echo '>nul &cls&@echo off &wscript //E:vbs "%~f0"
::With CreateObject("WMPlayer.OCX.7").cdromCollection
::.Item(0).eject
::WScript.echo "光驱已经打开"&vbcrlf&"单击确定关闭光驱"
::.Item(0).eject
::End With
保存为:test.bat,有一定的“欺骗成分”
|
|
2006-12-10 12:13 |
|
|
eech
高级用户
   
积分 906
发帖 346
注册 2006-7-10
状态 离线
|
|
2006-12-10 12:15 |
|
|
redtek
金牌会员
     
积分 2902
发帖 1147
注册 2006-9-21
状态 离线
|
『第 10 楼』:
使用 LLM 解释/回答一下
2楼、3楼代码都可行,经过实验:)
但是,2楼代码需要将倒数第2行的“cscritp.exe” 改为 “cscript.exe”,
因为那个词拼写失误(估计是急着给你回贴怕楼主等时间长了),哈哈……
Last edited by redtek on 2006-12-9 at 11:22 PM ]
|

Redtek,一个永远在网上流浪的人……
_.,-*~'`^`'~*-,.__.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._ |
|
2006-12-10 12:20 |
|
|
eech
高级用户
   
积分 906
发帖 346
注册 2006-7-10
状态 离线
|
『第 11 楼』:
使用 LLM 解释/回答一下
谢谢5楼的朋友.你说的对.但二楼的大虾文件会生成一个临时文件.虽能自动删除.但要不生成就更完美了
|
|
2006-12-10 12:24 |
|
|
lxmxn
版主
       
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
|
2006-12-10 12:38 |
|
|
3742668
荣誉版主
      
积分 2013
发帖 718
注册 2006-2-18
状态 离线
|
|
2006-12-10 12:41 |
|
|
lxmxn
版主
       
积分 11386
发帖 4938
注册 2006-7-23
状态 离线
|
『第 14 楼』:
使用 LLM 解释/回答一下
记得在下面用一句taskkill结束mshta进程。
经过测试,不用taskkill结束进程,也会自动关闭窗口的,任务管理器里面也没有mshta.exe进程。
|
|
2006-12-10 12:45 |
|
|
3742668
荣誉版主
      
积分 2013
发帖 718
注册 2006-2-18
状态 离线
|
『第 15 楼』:
使用 LLM 解释/回答一下
Originally posted by lxmxn at 2006-12-10 12:45:
经过测试,不用taskkill结束进程,也会自动关闭窗口的,任务管理器里面也没有mshta.exe进程。
你什么版本的什么操作系统?
我实验过很多次,也问过不少朋友,从脚本创建WMPlayer.OCX对象后都存在无法释放的情况。
我的测试环境都是xp sp2联想oem版。
————————————俺是分割线——————————————
*********************************
版务记录
*********************************
操作: 合并主题
原因: 讨论主题重复
原fid: 25520
执行: 3742668
备注: 1.建议发贴前看看置顶版规
2.一个主题不要多次发贴。
**********************************
Last edited by 3742668 on 2006-12-10 at 01:11 PM ]
|
|
2006-12-10 13:06 |
|