[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] VBS为什么msgbox不出来?

  1. set ws=createobject("wscript.shell")
  2. set pro=ws.exec("wscript 1.vbs")
  3. do
  4. msgbox pro.stdout.atendofstream
  5. if not pro.stdout.atendofstream then
  6. msgbox pro.stdout.readall
  7. end if
  8. if not pro.stderr.atendofstream then
  9. msgbox pro.stderr.readall
  10. end if
  11. if pro.stdout.atendofstream and pro.stderr.atendofstream and pro.status=0 then
  12. pro.stdin.writeline(inputbox("stdin"))
  13. end if
  14. loop
复制代码
1.vbs内容:
  1. a=wscript.stdin.readline()
  2. wscript.stdout.writeline(123)
  3. wscript.stdout.write(1231)
复制代码
doloop里第一句的msgbox就msgbox不出来
但是如果换成msgbox 1就可以
为什么呢
这句句子里只要带了pro.stdout.atendofstream 不管写啥都不会执行
比如我写msgbox asdfasdfbvjkxvl(pro.stdout.atendofstream)
你好

回复 4# czjt1234


    嗯 有道理 之后去用vb试试 看看是不是wscript.exe的问题
你好

TOP

wscript.exe才多大个文件,你上次发的帖,微软还计划马上默认不支持vbs
这玩意有点bug很正常么
就象你上次发的,读取mediaplay.lnk的备注会出错一样

QQ 20147578

TOP

回复 2# czjt1234


    1.实际上是能用的 你可以去看我发在文字消遣里的“神奇的exec”
2.哪怕不能用msgbox为什么失效了?
你好

TOP

stdout  只在 cmd.exe 命令提示符环境中有效

QQ 20147578

TOP

返回列表