×

您收到0封站内信：

×

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

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

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

{{item.C_Name}}

问题

新手求解 wincc里面的vbs脚本代码不运行

1

1973 产品版区：WinCC基本系统

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

VBS连续创建文件，在按钮事件中不执行

Dim fso,TestFile
Set fso=CreateObject("Scripting.FileSystemObject")
For i=1 To 10
Set TestFile=fso.CreateTextFile("C:\hello"&i&".txt",Ture)
TestFile.WriteLine("Hello,World!")
TestFile.Close
Next

VBS创建单个文件，在按钮事件中却可以执行，为什么？
用的WICC6.0版本

Dim fso,TestFile
Set fso=CreateObject("Scripting.FileSystemObject")
Set TestFile=fso.CreateTextFile("C:\hello.txt")

问题补充： WICC6.0 VBS连续创建文件，在按钮事件中不执行,
在记事本程序创建后，却执行很顺利
程序如下：
Dim fso,TestFile
Set fso=CreateObject("Scripting.FileSystemObject")
For i=1 To 10
Set TestFile=fso.CreateTextFile("C:\hello"&i&".txt",Ture)
TestFile.WriteLine("Hello,World!")
TestFile.Close
Next

WICC6.0 VBS连续创建文件，在按钮事件顺利执行,
记事本程序创建后，执行顺利
修改后的程序如下：

Dim fso,TestFile,i

Set fso=CreateObject("Scripting.FileSystemObject")
For i=1 To 10
Set TestFile=fso.CreateTextFile("C:\hello"&i&".txt")
TestFile.WriteLine("Hello,World!")
TestFile.Close

Next
这是为什么？记事本程序和 wicc 程序对VBS 编程的要求不一样吗？

新手问题，多谢二位回答，没法都设为最佳答案，只能选择一位抱歉

扫码小程序：

一键登录查看全部问答

wswxxx 新生

被采纳率低

问题为何被关闭

分享

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

点击复制链接
举报

去论坛讨论

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

是这段有问题
Set TestFile=fso.CreateTextFile("C:\hello"&i&".txt",Ture) 括号里的字符串链接有问题。
这里改为("C:\hello"+i+".txt",Ture)看看，毕竟I是个数字。

Letham 中级工程师

被采纳率 46.85% 来自手机Wap客户端 2015-03-13 07:46

提问者对于答案的评价

暂无评价

wswxxx

被采纳率低 2015-03-12 21:07

查看其他答案

等您来回答换一换

{{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}}

找答案微信小程序

提问
搜索

信息提示

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