我想在CC_4_05_09_07_13_09_37R数据库里面的tt表下实现如下操作：
当username=变量name时，把该列的usernumber,scorce改成0 56。
但是结果却不对的，当我运行后到tt表里面看不到usernumber,scorce有任何变化。
各位高手给点建议了，以前没学过数据库现在什么都不懂。
我的程序代码如下：
Sub OnClick(Byval Item)
Dim cnn

Dim strcnn

Dim rst

Dim com

Set cnn = CreateObject("ADODB.Connection")

strcnn = "Provider=sqloledb;data source=\wincc;initial catalog=CC_4_05_09_07_13_09_37R;integrated security=sspi"

cnn.open(strcnn)

Set rst = CreateObject("ADODB.Recordset")

Set com = CreateObject("ADODB.Command")

Com.Commandtype=1

Set Com.ActiveConnection= cnn

Dim name1

Dim name2

Set name1 = HMIRuntime.Tags("name")

name2=name1.Read

Com.Commandtext="updata tt set usernumber=0,scorse=56 where username='"& name2 & " '"


Set rst = Com.Execute
End Sub