中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-06-14 18:57
楼 主 求关闭光驱的批处理.不知有没有 发表于 2006-12-10 08:28 ·  中国 安徽 芜湖 电信
高级用户
★★★
积分 906
发帖 346
注册 2006-07-10 09:58
UID 58334
性别 男
状态 离线
mshta "javascript:new ActiveXObject('WMPlayer.OCX').cdromCollection.Item(0).Eject();window.close();"

这是联盟的一位大虾写的弹出光驱的批处理.配上快捷键.超爽.但不足的是没有关闭光驱的批处理.
请教各位大虾.在不用软件的前提下.
有没有关闭光驱的批处理
2 发表于 2006-12-10 08:49 ·  中国 湖北 武汉 电信
版主
★★★★★
积分 11,386
发帖 4,938
注册 2006-07-23 17:10
UID 59080
状态 离线

  下面是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 ]
3 发表于 2006-12-10 09:11 ·  中国 安徽 芜湖 电信
高级用户
★★★
积分 906
发帖 346
注册 2006-07-10 09:58
UID 58334
性别 男
状态 离线
哇塞.真是偶像.刚在霏凡问了.一个级别很高的朋友.对我说没有关闭批处理.这下他可没话说了
4 发表于 2006-12-10 09:32 ·  中国 四川 成都 教育网
铂金会员
★★★★
积分 7,493
发帖 2,672
注册 2005-09-02 00:00
UID 42173
性别 男
状态 离线
霏凡是什么啊?

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'>"
5 发表于 2006-12-10 10:45 ·  中国 甘肃 平凉 电信
金牌会员
★★★★
积分 4,103
发帖 1,744
注册 2006-01-20 13:00
UID 49241
性别 男
来自 甘肃.临泽
状态 离线
Originally posted by electronixtar at 2006-12-10 09:32:
霏凡是什么啊?

论坛
6 如何将这个VBS转BAT 发表于 2006-12-10 12:00 ·  中国 安徽 芜湖 电信
高级用户
★★★
积分 906
发帖 346
注册 2006-07-10 09:58
UID 58334
性别 男
状态 离线
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 ]
7 发表于 2006-12-10 12:09 ·  中国 湖北 武汉 电信
版主
★★★★★
积分 11,386
发帖 4,938
注册 2006-07-23 17:10
UID 59080
状态 离线


@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 ]
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
redtek +3 2006-12-10 12:13
8 发表于 2006-12-10 12:13 ·  中国 广东 清远 联通
高级用户
★★
积分 846
发帖 247
注册 2006-10-27 12:03
UID 68504
性别 男
来自 湖南==》广东
状态 离线
::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,有一定的“欺骗成分”
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
redtek +3 2006-12-10 12:16
9 发表于 2006-12-10 12:15 ·  中国 安徽 芜湖 电信
高级用户
★★★
积分 906
发帖 346
注册 2006-07-10 09:58
UID 58334
性别 男
状态 离线
二楼的朋友.试了不行啊.
10 发表于 2006-12-10 12:20 ·  中国 北京 朝阳区 联通
金牌会员
★★★★
积分 2,902
发帖 1,147
注册 2006-09-21 12:00
UID 63324
性别 男
状态 离线
2楼、3楼代码都可行,经过实验:)

但是,2楼代码需要将倒数第2行的“cscritp.exe” 改为 “cscript.exe”,
因为那个词拼写失误(估计是急着给你回贴怕楼主等时间长了),哈哈……

[ Last edited by redtek on 2006-12-9 at 11:22 PM ]
    Redtek,一个永远在网上流浪的人……

_.,-*~'`^`'~*-,.__.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._
11 发表于 2006-12-10 12:24 ·  中国 安徽 芜湖 电信
高级用户
★★★
积分 906
发帖 346
注册 2006-07-10 09:58
UID 58334
性别 男
状态 离线
谢谢5楼的朋友.你说的对.但二楼的大虾文件会生成一个临时文件.虽能自动删除.但要不生成就更完美了
12 发表于 2006-12-10 12:38 ·  中国 湖北 武汉 电信
版主
★★★★★
积分 11,386
发帖 4,938
注册 2006-07-23 17:10
UID 59080
状态 离线

  2楼中的代码已经更正。多谢 Redtek 兄提醒啊。汗一下自己。
13 发表于 2006-12-10 12:41 ·  中国 湖北 荆门 电信
荣誉版主
★★★
积分 2,013
发帖 718
注册 2006-02-18 07:07
UID 50550
状态 离线
mshta "javascript:with (new ActiveXObject('WMPlayer.OCX').cdromCollection.Item(0)){Eject();if(confirm("是否进仓?")) Eject();}window.close();"

正在从vbs转到js,给个同样功能的吧。记得在下面用一句taskkill结束mshta进程。
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
youxi01 +4 2006-12-10 12:45
14 发表于 2006-12-10 12:45 ·  中国 湖北 武汉 电信
版主
★★★★★
积分 11,386
发帖 4,938
注册 2006-07-23 17:10
UID 59080
状态 离线


记得在下面用一句taskkill结束mshta进程。

  经过测试,不用taskkill结束进程,也会自动关闭窗口的,任务管理器里面也没有mshta.exe进程。
15 发表于 2006-12-10 13:06 ·  中国 湖北 荆门 电信
荣誉版主
★★★
积分 2,013
发帖 718
注册 2006-02-18 07:07
UID 50550
状态 离线
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 ]
论坛跳转: