求 vbs 访问wincc历史数据库的例子

求 vbs 访问wincc历史数据库的例子,
在网上查了一些资料,自己写了个代码。
但是查询的时候总是没有数据,数据库里应该有很多数据的,高了很多天了,也没弄明白
希望高手给个例子。
或者高手帮我看看下面的代码:
Dim connstr,SqlStr
Dim Conn,rs
Set Conn =CreateObject(

问题补充:
Dim connstr,SqlStr
Dim Conn,rs
Set Conn =CreateObject("ADODB.Connection")
‘connstr="Provider=WinCCOLEDBProvider.1;Catalog=CC_report_11_07_30_10_08_31R;Data Source=.\WinCC"
connstr="Provider=WinCCOLEDBProvider.1;Catalog=CC_rpt_11_08_10_16_24_26R;Data Source=.\WinCC"
conn.open connstr
Set rs=CreateObject("adodb.recordset")
SqlStr="TAG:R,’rpt\NewTag1′,’2011-8-11 02:10:00.000′,’2011-8-11 16:06:00.000’"
‘Report\Newtag1 分别是归档名称和归档变量
rs.open sqlstr,conn,1,3
If rs.eof Then  
 MsgBox "没有相关数据"
Else
 Do While Not rs.eof 
 
  MsgBox rs.Fields(2).Value
   rs.movenext
 Loop
End If

专家建议

http://www.ad.siemens.com.cn/download/searchResult.aspx?searchText=A0048
A0048    “WinCC V6 使用技巧”演示项目及使用说明(2006.08.18)     DemoV6画面PA7_bld04.pdl,PA7_bld05.pdl中vbs访问变量归档的方法

提问者对于答案的评价:

原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc310426.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2020年11月1日
下一篇 2020年11月1日

相关推荐