×

您收到0封站内信：

×

找答案的高端用户（找答案钻石及双钻级别的用户）将尽可能从此问题下的所有回

答中，为您推荐最佳答案。届时您可以根据推荐数采纳答案。

如果自提问时间起7天内您仍无法选出最佳答案，您可以选择“无满意答案”关闭此问题。

{{item.C_Name}}

问题

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

5439 产品版区：WinCC基本系统

文档类型：问题类别：产品选型问题类别：产品使用问题类别：故障诊断

我想用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

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

问题补充：

扫码小程序：

一键登录查看全部问答

sgaibobo 资深学长

被采纳率低

问题为何被关闭

分享

手机扫码追踪该问题，
觉得实用，立即去分享！

点击复制链接
举报

去论坛讨论

参与「找答案」每周问答福利，提问或回答即可全民瓜分3000西币奖池，发1条也能分西币！用心解答更有机会单篇直发66西币，上不封顶。每周还有快答侠、夺魁答侠等专属称号与丰厚奖励等你来拿！西币可兑换实物奖品，随手互动免费领福利。

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
本人测试通过。

冲向蓝天助理工程师

被采纳率 14.61% 2011-01-21 12:40

提问者对于答案的评价

暂无评价

sgaibobo

被采纳率低 2011-01-21 11:03

查看其他答案

等您来回答换一换

{{item.Title}} {{item.Title}}: {{item.CoinValue}}西币 {{item.VisitNum}}人想问
我来答我来答

本版相关问题换一换

{{item.Title}} {{item.Title}}: {{item.AnswerCount}}个回答 {{item.VisitNum}}人关注

专家置评

专家置评

处理方式

官方认证将此问题置为精华

0/3000

上传图片

处理时长

分钟

置评KPI提醒: 置评 >20% 精华 >5% 打标签 >20%

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

西门子找答案

首次回答问题，获得
双倍西币积分！
立即成为技术知识分享的一员!

积分

{{item.MenuName}}

{{item.MenuName}}

本版热门问题更多

{{item.Title}}: {{item.AnswerCount}}个回答 {{item.ReadCount}}人关注

热门视频，猜你喜欢

向您推荐换一换

{{item.Title}} {{item.Title}}

{{item.Title}} {{item.Title}}

{{item.Title}} {{item.Title}}

: 每周提问、回答都有奖励，这波福利千万别错过！

热搜榜单
问题榜单


{{index+1}}: {{item.Title}}

{{item.CloseDate}}

{{item.Title}}

{{item.VisitNum}}人关注 {{item.CloseDate}}

找答案微信小程序

提问
搜索

信息提示

很抱歉！您所访问的页面不存在，或网址发生了变化，请稍后再试。