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

[问题求助] [已解决]VBS 调用tclsh 后log怎么保存?

本帖最后由 xixiyang80 于 2015-10-21 16:36 编辑

大家好, 有个问题, 请大家帮我看看.
我用secureCRT 调用了 Wscript.Shell, 然后log 怎么保存, 谢谢, 代码如下:
  1. Set vbs=CreateObject("Wscript.Shell")
  2. vbs.Run "tclsh "
  3. crt.sleep 1000
  4. vbs.SendKeys " source d:/autotest/tcl/11.tcl  {enter}"
  5. crt.sleep 2000
  6. vbs.SendKeys "exit {enter}"
复制代码
我想要的log是 11.tcl 的全部log, 该怎么自动保存到本地文件?
谢谢!
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

需要在TCL里实现。我不懂TCL

TOP

SecureCRT本身可以设置会话的日志

选中一个会话 >>> 属性 >>> 终端 >>> 日志文件
输入日志文件名,例如 C:\%H_%Y-%M-%D_%h-%m-%s.log
勾选“在连接上开始记录日志”
勾选“追加到文件”

TOP

回复 3# DAIC


    谢谢, SecureCRT 里的log 保存, 只能保存在CRT里的log, 不能保存tcl 运行时的log.

TOP

请大神和斑竹帮忙, 未解决

TOP

已解决, 如下可以:
Set vbs=CreateObject("Wscript.shell")
vbs.Run ("%comspec% /c tclsh d:/autotest/tcl/11.tcl 1>>d:/capture/result/case1.txt"),1,True

TOP

回复 6# xixiyang80


    其实可以考虑用 exec,然后操作 stdin 和 stdout

TOP

返回列表