python 西门子触摸屏通讯_西门子触摸屏利用VBScript脚本创建csv文件

功能描述:利用VBScript脚本创建csv/txt文件

有时需要将PLC或运动控制器Simotion中的数据写到SD卡或U盘上。一种实现方法是,如果使用的是精致面板(comfort panel),可以使用vbscript生成脚本。

软件 TIA Portal V14sp1, Wincc professional V15sp1

硬件 一个西门子 TP1200触摸屏 (wince系统),其它西门子comfort panel也可以

此功能不能使用Wincc模拟器执行,需要有真实的触摸屏

Wince 使用的VBS对象和Windows有区别

Step1

在触摸屏中建立2个internal tag,

var1,var1

本文中使用触摸屏的internal tag,如果需要存储PLC中内容,请使用PLC tag

Step2 将u盘插入TP1200

在wince系统的"我的电脑"中,查看是否识别了优盘

u盘的路径 "\Storage Card usb"

Step3 插入脚本

以下脚本生成两行CSV表格,第一行是写入文本;第二行是记录var1,var2两个变量的值.

使用FileCtl类创建对象

定义文件路径和文件名

使用open方法来打开文件

使用LinePrint方法写入行

使用close方法关闭文件

Sub VBFunction_1()

Dim f,Storage_Path

Dim v1,v2

Set f =CreateObject("FileCtl.File")

Storage_Path = "\Storage Card usb\myfile.csv"

f.open Storage_Path,2

v1 = SmartTags("var1")

v2 = SmartTags("var2")

f.LinePrint("valueName1,valueName2,valueName3")

f.LinePrint(""&v1&","&v2&",")

f.close

Set f = Nothing

End Sub

Step4 通过一个按钮触发脚本

写入优盘后,使用EXCEL打卡CSV文件查看

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值