wincc7.3与MYSQL_wincc与数据库连接问题

在数据库2008新建了一个一个ss123数据库，数据库的表名为1,。上位机wincc新建本地变量Data1 、 Data2 、Data3   、data4、data5、data6，想将数据库中的数据与本地变量连接起来，实现数据传递，由两个按钮来实现。从数据库中读数据代码如下：

Dim sCon

Dim sSql

Dim oRs

Dim conn

Dim oCom

Dim Con

Dim Data1

Dim Data2

Dim Data3

Dim data4

Dim data5

Dim data6

con="Provider=SQLOLEDB.1;Persist Security Info=True;Initial Catalog=ss123;User ID=sb;Password=password;Data Source=.\WINCC"

Set conn = CreateObject("ADODB.Connection")

conn.ConnectionString = Con

conn.CursorLocation = 3

conn.Open

sSql="SELECT * FROM [1] WHERE 编号=1"

Set oRs = CreateObject("ADODB.Recordset")

Set oCom = CreateObject("ADODB.Command")

Set oCom.ActiveConnection = conn