大家好，我想把WinCC中的一个变量(NewTag)实时写入Access中，不知如何实现，还请指教。
我现在的做法是在全局脚本的动作中写了一段VBS如下,可是Access中未更新数据，不知道是何原因？
Function action
Dim objConnection
Dim objRecordset
Dim strConnectionString
Dim lngValue
Dim strSQL
Dim objCommand
strConnectionString = "Provider=Microsoft.Ace.OLEDB.12.0;Data Source=C:\WinCC.accdb"
lngValue = HMIRuntime.Tags("NewTag").Read
strSQL = "INSERT INTO WinCC_Data (Value1) VALUES (" & lngValue & ");"
Set objConnection = CreateObject("ADODB.Connection")
objConnection.ConnectionString = strConnectionString
objConnection.Open
Set objCommand = CreateObject("ADODB.Command")
objCommand.ActiveConnection = objConnection
objCommand.CommandText = strSQL
objCommand.Execute
Set objCommand = Nothing
objConnection.Close
Set objConnection = Nothing
End Function
