大家好，请教一下如何将变量数据写入到用户归档中？
下面的程序我放在一个按钮动作中，测试下来，写不进数据，好像是insert into 那句话写得不对，请高手帮忙看看啊啊啊啊~~~~~

Dim DSN
Dim strConn
Dim conn
Dim oCom
Dim oRs
Dim sSql

Dim Data1
Dim Data2
Set Data1 = HMIRuntime.Tags("tag1").Read
Set Data2 = HMIRuntime.Tags("tag2").Read


DSN = HMIRuntime.Tags("@DatasourceNameRT").Read
strConn="Provider=SQLOLEDB.1;Integrated Security=SSPI;" _
& "Persist Security Info=False;Data Source=.\WINCC;" _
& "Initial Catalog='" & DSN & "';"

sSql = "insert into UA#PFF(A,B) VALUES('"&Data1&"','"&Data2&"');" ’=====PFF是用户归档 中的一个归档名，A,B分别是归档PFF中的两个域=======测试了一下，写不进数据，好像是这句用法不对

'===================连接数据库==================
Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = strConn
conn.CursorLocation = 3
conn.Open
'===================写入数据库==================
Set oRs = CreateObject("ADODB.Recordset")
Set oCom = CreateObject("ADODB.Command")
oCom.CommandType = 1
Set oCom.ActiveConnection = conn
oCom.CommandText = sSql
Set oRs = oCom.Execute


oRs.close
Set oRs = Nothing
conn.close
Set conn = Nothing