文档详情

wincc访问Acess数据库分析和总结.docx

发布:2024-03-12约小于1千字共3页下载文档
文本预览下载声明

wincc访问Acess数据库

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

最佳答案

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

Wincc用VBS脚本读写ACESS数据库

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

SubOnOpen()

”“打开时检查一下系统路径IfTrim(HMIRuntime.Tags(“Db_Path”).Read)=““ThenMsgBox”请检查系统数据库路径,系统检测到不正常!现

在路径是:”HMIRuntime.Tags(“Db_Path”).Read

Else

”“定义combol对象

DimcomSetcom=ScreenItems(“combolbox_receipe”)com.Clear

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

”“首先打开数据库

DimConn,ResultSetSetConn=CreateObject(“ADODB.Connection”)SetResultSet=CreateObject(“ADODB.Recordset”)

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

ResultSet.open”Select*Fromrecipe”,Conn,1,1”“依次读出数据库中配方的数量DoWhileNotResultSet.EOF

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

ResultSet.MoveNextLoop

com.ListIndex=0SetResultSet=Null”“结果集置空SetConn=Null”“连接置空ResultSet.Close”“结果集关闭Conn.close”“连接关闭

EndIfEndSub

当系统切换到此页面时,将从数据库中读出表recipe中

的值,到Combolbox中,并且将ListIndex=0的那一项列为默认项

显示全部
相似文档