想要把wincc内部数据导入Access中，按照《深入浅出》编了一段VBS的程序，但是没有运行。我在D盘建立了一个名叫dbsample的Access文件，命名了一个data的数据表里建立tagvalue的列。还有Access文件建立在哪里都可以么？我没有接触过数据库，对于书上说得创建ODBC数据源不是很理解，请高手们指教！！！！
Sub OnRButtonDown(Byval Item, Byval Flags, Byval x, Byval y)
Dim objConnection
Dim strConnectionString
Dim lngValue
Dim strSQL
Dim objCommand
strConnectionString = "Provider=MSDASQL;DSN=dbsample;UID=;PWD=;"
lngValue = HMIRuntime.Tags("Tag1").Read
strSQL = "INSERT INTO data (tagvalue) 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
最佳答案
Access文件可以建在任何地方，winCC通过ODBC方式访问数据库时，主要是根据所建立的ODBC数据源，在ODBC数据源建立过程中指定所建立的数据库文件路径
提问者对于答案的评价：
已解决
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc274226.html
微信扫一扫 
支付宝扫一扫