批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程
[批处理文件精品]批处理版照片整理器[批处理文件精品]纯批处理备份&还原驱动在线第三方下载
返回列表 发帖

在同个文件中实现Bat与vbs代码交错执行

全文:http://hi.baidu.com/paktc/blog/item/66b7e852cc73d5561038c2f2.html

标题:今天开始Cscript之bat和vbs同文件中交互使用

一下是题目相关部分:
    也许是我知识不足,
不知道vbs在cscript模式下如何实现按任意键继续,
不知道vbs如何实现代码跳转,索性尝试一下用以前见过的知识实现
vbs与batch在同一个脚本中 交互使用。这样p的特点就能根vbs结合一部分了。
前提是:
   在NTFS文件类型的磁盘下执行。该脚本保存为bat格式
实现方式:
   打开后用 fsutil命令设置自身的短文件为 同名.vbs
   这样它就拥有两种文件关联。
   然后再以 cscript 调用自身.vbs 结束后返回批处理。
   以下是批处理与vbs代码在同一个文件中交互执行的一个浅浅的例子,请保存为bat格式:

  1. ' 2>nul &echo off &cls &fsutil file setshortname "%~nx0" "%~n0.vbs"
  2. :'loop
  3. ' 2>nul &set /p inp="你可以输入两个小数,本脚本尝试作乘法运算: "
  4. ' 2>nul &if "%inp%" == "exit" (exit)
  5. ' 2>nul &cscript //nologo "%~n0.vbs" %inp%
  6. ' 2>nul &pause &cls &goto :'loop
  7. set x=wscript.arguments
  8. call count(x(0),x(1))
  9. sub count(a,b)
  10. wscript.echo a*b
  11. wscript.quit
  12. end sub
复制代码

其中批处理的循环: 循环标记是以冒号开头的,":"又刚好是vbs的分句
标记,后接 '标签(如 :'loop) ,使batch标签在vbs文件中不冲突。
   如果一定要在批处理句子中夹杂vbs语句,如wscript.echo "haha"
直接前面加:
   :wscript.echo "haha"
在batch中是注释,在vbs 是分句。


[ 本帖最后由 523066680 于 2009-9-18 12:16 编辑 ]
综合型编程论坛
Writing Code That Nobody Else Can Read.

输入exit退出……
原文有个cscript版的逐字读文本。愿意看就看咯~

[ 本帖最后由 523066680 于 2009-9-18 12:30 编辑 ]
综合型编程论坛
Writing Code That Nobody Else Can Read.

TOP

还真没人鸟我,唉……
if_exist=not exist

[ 本帖最后由 523066680 于 2009-9-18 17:52 编辑 ]
综合型编程论坛
Writing Code That Nobody Else Can Read.

TOP

相关讨论:批处理与其它语言、脚本混合编程
http://bbs.bathome.net/thread-4610-1-1.html
【批处理在线视频分享】http://bbs.bathome.net/thread-31727-1-1.html
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html

我帮忙写的代码不需要付钱,不用找我要支付宝或微信账号。如果一定要给,请到微信群给大家发红吧。

TOP

回复 3# 523066680

顶一下
[url=http://taqiao.net]我的空间[/url]

TOP

返回列表