WINCC中用VBS脚本写文本文件问题

我想用winCC中的VBS脚本向一个文本文件中写变量,西门子也提供了一个例程:
Dim fso, MyFile

Set fso = CreateObject("Scripting.FileSystemObject")

Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)

MyFile.WriteLine("This is a test.")

MyFile.Close

但是这个脚本是每次用建一个新的文本文件去覆盖前一个文本文件,不能实现在同一个文本文件中逐行写入变量,请问这个要求怎么实现啊.

最佳答案

Dim fso, MyFile
Const ForAppending = 8
Set fso = CreateObject("Scripting.FileSystemObject")
MsgBox("aaa")
Set MyFile = fso.OpenTextFile("d:\testfile.txt",ForAppending,True)
MsgBox("bbb")
MyFile.WriteLine("This is a test.")
MsgBox("ccc")
MyFile.Close
本人测试通过。

提问者对于答案的评价:
thank you!

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc266806.html

(1)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月11日 上午4:48
下一篇 2019年6月11日 上午4:48

相关推荐

  • WinCC User Archive 如何使用

    请问各位大侠WinCC里面的 User Archive组件是做什么用的? 如何使用? 在wincc中的图形编辑器中调用的归档组件具体怎么用?…

    SIMATIC WinCC 2019年6月11日
  • 某个按钮操作权限

    如果当前有用户正确登录(不管什么权限)都可以点击操作该按钮,应该如何设计?谢谢! 问题补充:不好意思,没有表达清楚!意思是如果要操作某个按钮则必须有用户登录才行,而不管这个用户拥有…

    SIMATIC WinCC 2019年6月11日
  • wincc 冗余实现方法

    现在的系统是:上位机是WINCC6.0 SP3   PC/PPI电缆,CPU224XP, 运行正常 但是客户现在要在这个…

    SIMATIC WinCC 2019年6月11日
  • wincc项目转换

    转换项目,字体都变成乱码了。有什么高招能把字符如实转换吗? 钻石用户推荐最佳答案 在转换后的项目里,把语言设置正确就行了。先去WINCC的计算机属性里修改语言 然后去具体…

    SIMATIC WinCC 2021年7月5日
  • 报表打印函数在全局动作中的应用问题

    想做一个班报表全局自动打印动作,但为什么报表打印函数在全局动作中的应用与画面动作应用不一样?画面动作中的应用格式RPLOJECTPRINT("打印作业"),而在…

    SIMATIC WinCC 2019年6月11日
  • 关于举行移动的脚本

    我做了一个矩形向上移动的脚本,要移动3次,每次移动10,三次后回到初始位置,但是运行后矩形一直想上移动不回初始位置,监控发现  i 的值始终为1,请问…

    SIMATIC WinCC 2018年3月6日
  • WinCC V6.0 SP2安装

    本人在安装WinCC V6.0 SP2软件时遇到MIicrosoft Message Queuing V5.0与MIicrosof…

    SIMATIC WinCC 2019年6月11日
  • 报警记录 下降沿记录的问题

    我想要对一个开关量下降沿时进行记录,我勾选了单个消息-参数-在下降沿创建,但上升沿还是会记录,我只要下降沿记录,怎么办?谢谢 专家建议 因为您对问题的描述不是特别的详细,所以2种方…

    SIMATIC WinCC 2020年11月1日
  • 求教VB读写EXCEL语句求教

    各位高手,我在学习WINCC用EXCEL做报表,用VB来读写EXCEL,请教:Dim xlApp As Excel.Application …

    SIMATIC WinCC 2019年6月10日
  • wincc历史曲线每天凌晨都丢失十几分钟

    我们的一个控制系统使用wincc监控,但是每天夜里十一点五十左右历史曲线完全消失,十几分钟后又重新显示,且含有之前不显示时间段的部分..定义曲线的变量使用的是归档变量..十几分钟无…

    SIMATIC WinCC 2019年6月11日