投稿
  1. 找知识-找PLC首页
  2. 自动化系统
  3. SIMATIC WinCC

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

• SIMATIC 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 编程的要求不一样吗？

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

最佳答案

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

提问者对于答案的评价：
谢谢您的回答

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

赞 (0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
0 0
上一篇 2017年10月24日
下一篇 2017年10月24日

相关推荐