wincc访问Acess数据库

wincc访问Acess数据库

我用的时wincc6.2，怎样去读写另一台电脑上的一个Acess数据库中的内容？

最佳答案

WINCC的VBS可以很好的操作EXCEL，操作ACCESS也没有问题。

Wincc用VBS脚本读写ACESS数据库

首先要进入系统的数据库设定。设定完后，将ACess数据库的路径存入Wincc中对应的一个变量。然后在用到数据库内容的地方，用

SubOnOpen()

”“打开时检查一下系统路径

IfTrim(HMIRuntime.Tags(“Db_Path”).Read)=““Then

MsgBox”请检查系统数据库路径,系统检测到不正常！现在路径是：”&HMIRuntime.Tags(“Db_Path”).Read

Else

”“定义combol对象

Dimcom

Setcom=ScreenItems(“combolbox_receipe”)

com.Clear

com.AddItem”请选择配方...”,0

”“首先打开数据库

DimConn,ResultSet

SetConn=CreateObject(“ADODB.Connection”)

SetResultSet=CreateObject(“ADODB.Recordset”)

Conn.open”Provider=Microsoft.Jet.OLEDB.4.0;DataSource=“& HMIRuntime.Tags(“Db_Path”).Read

ResultSet.open”Select*Fromrecipe”,Conn,1,1

”“依次读出数据库中配方的数量

DoWhileNotResultSet.EOF

com.AddItemResultSet(“name”).value,ResultSet(“Id”).valuE ResultSet.MoveNext

Loop

com.ListIndex=0

SetResultSet=Null”“结果集置空

SetConn=Null”“连接置空

ResultSet.Close”“结果集关闭

Conn.close”“连接关闭

EndIf

EndSub

当系统切换到此页面时，将从数据库中读出表recipe中的值，到Combolbox中，并且将ListIndex=0的那一项列为默认项