我用的时wincc6.2,怎样去读写另一台电脑上的一个Acess数据库中的内容?哪位大侠知道,请指点迷津?
最佳答案
WINCC的VBS可以很好的操作EXCEL,操作ACCESS也没有问题。
Wincc用VBS脚本读写ACESS数据库
首先要进入系统的数据库设定。设定完后,将ACess数据库的路径存入Wincc中对应的一个变量。然后在用到数据库内容的地方,用
Sub OnOpen()
''打开时检查一下系统路径
If Trim(HMIRuntime.Tags("Db_Path").Read)="" Then
MsgBox "请检查系统数据库路径,系统检测到不正常!现在路径是:" & HMIRuntime.Tags("Db_Path").Read
Else
''定义combol对象
Dim com
Set com=ScreenItems("combolbox_receipe")
com.Clear
com.AddItem "请选择配方...",0
''首先打开数据库
Dim Conn,ResultSet
Set Conn = CreateObject("ADODB.Connection")
Set ResultSet = CreateObject("ADODB.Recordset")
Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & HMIRuntime.Tags("Db_Path").Read
ResultSet.open "Select * From recipe",Conn,1,1
''依次读出数据库中配方的数量
Do While Not ResultSet.EOF
com.AddItem ResultSet("name").value,ResultSet("Id").valuE
ResultSet.MoveNext
Loop
com.ListIndex =0
Set ResultSet=Null''结果集置空
Set Conn=Null ''连接置空
ResultSet.Close ''结果集关闭
Conn.close ''连接关闭
End If
End Sub
当系统 切换到此页面时,将从数据库中读出表recipe中的值,到Combolbox中,并且将ListIndex=0的那一项列为默认项
提问者对于答案的评价:
谢谢了,我试一下,有问题再请教你
原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc264462.html