中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-09 12:34

共 47,811 主题排行 / 349,895 发帖 / 今日 0 篇 / 48,254 会员排行

DOS批处理 & 脚本技术（批处理室） » VBS Popup 高手解决一下

可打印版本　1,093 / 14

第1楼　dragonamd	发表于 2008-08-20 17:26
中级用户　发帖 100　积分 209
VBS Popup 高手解决一下用BAT检测C盘最新生成的.TXT文件然后用VBS 的Popup显示出这个文件的名字可否做到？？？

第2楼　slore	发表于 2008-08-20 17:36
铂金会员　发帖 2,478　积分 5,212
能

第3楼　dragonamd	发表于 2008-08-21 02:14
中级用户　发帖 100　积分 209
能否举个例子，指教 [ Last edited by dragonamd on 2008-8-21 at 02:26 AM ]

第4楼　lxmxn	发表于 2008-08-21 03:34
版主　发帖 4,938　积分 11,386
for /f "tokens=" %%\ in ('dir /b /tc /o-d /a C:\.txt') do mshta vbscript:msgbox("%%\!")(window.close) & exit

第5楼　dragonamd	发表于 2008-08-21 04:28
中级用户　发帖 100　积分 209
谢谢斑竹，。但是不能用Popup这个命令制作吗

第6楼　lxmxn	发表于 2008-08-21 07:09
版主　发帖 4,938　积分 11,386
可以，你把vbs里面的语句修改一下就可以popup了。

第7楼　dragonamd	发表于 2008-08-21 11:16
中级用户　发帖 100　积分 209
语句我修改过了，但还是执行不了，。能否做个例子，我是新人不懂

第8楼　slore	发表于 2008-08-21 11:19
铂金会员　发帖 2,478　积分 5,212
你知道popup的是从哪里来的？哪里没有完整的语句麽？

第9楼　dragonamd	发表于 2008-08-21 11:55
中级用户　发帖 100　积分 209
for /f "tokens=" %%\ in ('dir /b /tc /o-d /a C:\.txt') do mshta vbscript:msgbox("%%\!")(window.close) & exit 就这句能修改吗

第10楼　slore	发表于 2008-08-21 12:44
铂金会员　发帖 2,478　积分 5,212
你为什么要改popup……只多了一个显示时间的参数。你找个完整的popup的例子就可以改了，要加CREATOBJECT

第11楼　dragonamd	发表于 2008-08-21 12:58
中级用户　发帖 100　积分 209
找不到例子，。。

第12楼　HAT	发表于 2008-08-21 13:46
版主　发帖 5,017　积分 9,023
@echo off for /f "tokens=" %%\ in ('dir /b /tc /o-d /a C:\.txt') do mshta vbscript:createobject("wscript.shell").popup("%%\!")(window.close) & exit

第13楼　dragonamd	发表于 2008-08-21 15:43
中级用户　发帖 100　积分 209
HAT 大哥出来就不一样

第14楼　dragonamd	发表于 2008-08-22 03:34
中级用户　发帖 100　积分 209
如何改写Popup标题

第15楼　HAT	发表于 2008-08-22 09:40
版主　发帖 5,017　积分 9,023
先看帮助，后提问。 object.Popup(strText,,,) 参数 object WshShell 对象。 strText 包含要显示在弹出式消息框中的文本的字符串值。 nSecondsToWait 可选。表示弹出式消息框最长显示时间（秒）的数值。 strTitle 可选。包含要作为弹出式消息框的标题显示的文本的字符串值。 nType 可选。表示要显示在弹出式消息框中的按钮和图标类型的数值。这些类型确定消息框的使用方法。 IntButton 表示用户单击以解除消息框的按钮号的整数值。该值由 Popup 方法返回。

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023