部分代码如下：
sPro = "Provider=WinCCOLEDBProvider.1;" '//定义服务提供者
sDsn = "Catalog=CC_fang_09_06_11_17_08_12R;"
sSer = "Data Source=.\WinCC"
sCon = sPro + sDsn + sSer
sSql = "TAG:R,'ProcessValueArchive\11','0000-00-00 00:00:00', '0000-00-00 00:00:00'"
Set conn = CreateObject"ADODB.Connection")
conn.ConnectionString = sCon
conn.CursorLocation = 3
conn.Open
Set oRs = CreateObject("ADODB.Recordset")
Set oCom = CreateObject"ADODB.Command")
oCom.CommandType = 1
Set oCom.ActiveConnection = conn
If conn.state = 0 Then
MsgBox "数据库连接不成功，可能是WINCC生产监控系统程序未激活，请先激活监控系统", vbOKCancel, "数据库连接错误"
conn.Close
Exit Sub
End If
oCom.CommandText = sSql
Set oRs = oCom.Execute

一开始程序可以运行，vb可以读取上历史数据库的值，可是重新装了系统，wincc和sql2000后，就读取不上数值来了。
激活wincc项目后，运行vb，vb就报错"-2147217865（80040e37） invalid object name "dbo.archive" "
然后调试，错误就显示在 Set oRs = oCom.Execute 这里
我已经把数据库的名称和归档名称和归档变量的名称都改正了。
另外，怎么wincc原来的项目文件中有些汉字也显示不出来了呢，只显示“？？？？”，怎末回事啊？用户归档也只能用德语显示，重新装了真郁闷！！是不是软件的问题啊？
请高手帮帮忙！谢谢