主题:wincc中的Ado及dataGrid控件的问题

f41c9ed66fb3c0e14f104f5513b126ce.gif

楼主 2013-03-26 18:23:02

在wincc的VBS中通过代码访问ADO对象产生的数据集,能不能绑定到datagrid控件上显示

1.若在画面上有ADO和datagrid对象,可以绑定

2.当画面止建立datagrid对象时,能不能绑定?

这个代码没什么作用,也不会报警,求解(datagrid 是画面建立的控件)

Sub X6309X94AE6X0000X0000_X6309X94AE3X00000_OnLButtonDown(Byval Item, Byval Flags, Byval x, Byval y)

Dim strCon, sSql

Dim conn,rs

strCon = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=CC_study_11_09_08_09_30_02R;Data Source=XMGB\WINCC"

sSql = "SELECT * FROM MyTable"

Set conn = CreateObject("ADODB.Connection")

conn.ConnectionString = strCon

conn.Open

Set rs = CreateObject("ADODB.RecordSet")

rs.CursorType = adOpenForwardOnly

Set rs.ActiveConnectiom = conn

rs.Open sSql

Dim grid

Set grid = ScreenItems("datagrid")

grid.DataSource = rs

grid.Refresh

Set conn = Nothing

Set rs= Nothing

End Sub

更多推荐