帮我写一个西门子WINCC VBS脚本,要求如下:
1、在按钮组态事件中,鼠标动作触发
2、鼠标单击按钮时,弹窗打开D盘根目录下"data.txt"文件
3、WINCC是7.5版本 以下是符合要求的WINCC VBS脚本:
Button1_OnClick() \\\\\\\'弹窗选择文件 Dim fso, filePath Set fso = CreateObject(\\\\\\\"Scripting.FileSystemObject\\\\\\\") filePath = InputBox(\\\\\\\"请输入文件路径:\\\\\\\") If filePath = \\\\\\\"\\\\\\\" Then Exit Sub End If \\\\\\\'打开文件 Dim file Set file = fso.OpenTextFile(filePath, 1) file.Close Set file = Nothing Set fso = NothingEnd Sub
将以上代码复制到按钮组态事件的VB脚本编辑框内,即可完成脚本编写。请注意,此脚本仅适用于WINCC 7.5版本。运行此脚本时,会弹窗提示输入文件路径,请输入D盘根目录下的\\\"data.txt\\\"文件的路径,并点击确定打开文件。
页:
1
[2]