WINCC写ACCESS数据问题

我用的一个VB脚本向ACCESS 写数据  为什么有的时候写成功
  有的时候写不成功
   而且我是向ACCESS 里面 WINCC_DATA 表的 Tag1 字段写 数据 
 但是它 每次都是写到Tag里面
  新手 请指教,,,,,,,急@!!!!!!!!!!!!!!!!!! 
 代码是WINCC帮助里面摘抄的
   如下:
 Sub X6309X94AE2X0000d_X6309X94AE2X0000X0000_X6309X94AE2X0000X002E_X6309X94AE2X0000X8BDD_X6309X94AE2X00009_OnClick(ByVal Item)
 Dim objConnection
 Dim strConnectionString
 Dim lngValue
 Dim strSQL
 Dim objCommand
 strConnectionString = "Provider=MSDASQL;DSN=SampleDSN;UID=;PWD=;" 
 lngValue = HMIRuntime.Tags("Tag1").Read
 strSQL = "INSERT INTO WINCC_DATA (Tag1) VALUES (" & lngValue & ");"  
 Set objConnection = CreateObject("ADODB.Connection")
 objConnection.ConnectionString = strConnectionString
 objConnection.Open
 Set objCommand = CreateObject("ADODB.Command")
 With objCommand
     .ActiveConnection = objConnection
     .CommandText = strSQL
 End With
 objCommand.Execute
 Set objCommand = Nothing
 objConnection.Close
 Set objConnection = Nothing
 End Sub

问题补充:
有人做过没啊
    请大家多多帮忙啊
  急啊!~~~~~~~~~~~~~~~~

最佳答案

通过OPC方式,或者脚本往ACCESS数据库写数据。见
 <<在VC中如何实现OPC数据访问>>下载:
 http://www2.ad.siemens.com.cn/download/Upload/AS/application/A0326.pdf

提问者对于答案的评价:
da

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

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月11日 上午6:50
下一篇 2019年6月11日 上午6:50

相关推荐