欧美鲁鲁_啦啦啦啦在线观看_日韩精品短视频_玩偶姐姐作品在线观看_天天综合天天做天天综合_国产综合图区

sxd566
級別: *
精華主題: * 篇
發帖數量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看sxd566的 主題 / 回貼
樓主  發表于: 2011-10-08 13:46
我剛接觸wincc,現在要在wincc里做一個月報表,需要每天在當天結束時將數據庫中的日表里的每項數據讀出來求平均值再寫入月表里,現在沒辦法實現數據讀取,可能是連接不到數據庫,
Dim objConnection
  Dim strConnectionString
  Dim opertime,device,command
  Dim strSQL
  Dim objCommand
  Dim DsnStr
  Dim dt
  Dim PV1,PV2,PV3,PV4,PV5,PV6,PV7,PV8,PV9,PV10,PV11,PV12,PV13,PV14,PV15,PV16
  Dim iday,imonth,iyear,ihour

  DsnStr="CC_sheet"
  strConnectionString = "Provider=MSDASQL;DSN="&DsnStr&";database=repotrdb;UID=sa;PWD=;"

  dt=Now() '系統時間
    imonth=Month(dt)
    iyear=Year(dt)
    iday=Day(dt)
    ihour=Hour(dt)
pv4="select influx from daydata where zyear="& iyear &  " And zmonth= " &imonth & "And zday=" & iday & " "
MsgBox pv4
'Set objConnection = CreateObject("ADODB.Connection")
'objConnection.ConnectionString = strConnectionString
  objConnection.Open
Set objCommand = CreateObject("ADODB.Command")
HMIRuntime.Trace strsql
objCommand.ActiveConnection = objConnection
objCommand.CommandText = strSQL
objCommand.Execute
objcomand
Set objCommand = Nothing
objConnection.Close
Set objConnection = Nothing

SQL語句在報表編輯器中的動態表格中測試是可以的

哪位高手知道的指點一下,急~~~~~

主站蜘蛛池模板: 成人m3u8视频| 久久国产香蕉一区精品 | 337p日本欧洲亚洲大胆色噜噜 | 好骚综合在线 | 欧美日本视频在线 | 亚洲精品国产成人片在线观看 | 艳妇臀荡乳欲伦交换h软件 熟女少妇精品一区二区 | 97av中文字幕 | av日韩av| 真人插b免费视频播放 | 免费看成人毛片无码视频 | 国产18GAY小鲜肉 | 免费黄色录像视频 | 欧美三级伦理片av帝王 | av2014天堂 | 美国豪放女大兵在线观看 | 亚洲美女视频在线观看 | 操女人在线观看 | 亚韩无码一区二区在线视频 | 蜜臀av片| av片哪里在线观看 | 高清视频91| 久久国产精品99久久人人澡 | 逼特逼视频网站 | 青青草原伊人 | 无毒黄色片网站 | 亚洲精欧美一区二区精品 | 久久久久久毛片免费播放 | 夜夜操天天射 | 国产日本欧洲亚洲 | 亚洲不卡av电影 | 国产色噜噜 | JLZZJLZZ亚洲乱熟无码 | 日韩国产精品激情一区 | 久精品视频在线 | 曰韩精品一区二区 | 天堂网亚洲 | 伊在人亚洲香蕉精品区麻豆 | 亚洲图片日本V视频免费 | 日本护士ooxⅹxxhd下载 | 少妇啪啪免费观看欧美三p poronoⅵdeos中国少妇 |