欧美 日韩 国产 成人 在线观看丨欧美综合自拍亚洲综合图丨3d动漫精品啪啪一区二区中丨人妻无码一区二区不卡无码av丨日躁夜躁狠狠躁2001

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語句在報表編輯器中的動態表格中測試是可以的

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

主站蜘蛛池模板: 人妻体体内射精一区二区| 国内精品人妻无码久久久影院导航| 337p粉嫩大胆色噜噜噜| 视频二区丝袜国产欧美日韩| 日本一二三区视频在线| 精品国产成人亚洲午夜福利| 国产精品亚洲一区二区| 成人区人妻精品一区二区不卡网站| 欧美 国产 日产 韩国 在线| 人人妻人人藻人人爽欧美一区| 亚洲欧美国产制服图片区 | 国产精品亚洲αv天堂| 97超级碰碰碰碰久久久久| 冲田杏梨av一区二区三区| 国产 制服丝袜 动漫在线| 国产精品亚洲一区二区在线观看| 成在人线av无码免费高潮水老板| 国产三级精品三级在专区| 成人做爰免费视频免费看| 2020久久天天躁狠狠躁夜夜 | 精品成人乱色一区二区| 无码h肉动漫在线观看| 色先锋av资源中文字幕| 一本久道综合在线无码88| 久久婷婷五月综合色欧美| 欧美激烈精交gif动态图| 国产真实强被迫伦姧女在线观看 | 亚洲熟妇av一区二区三区| 中文字幕精品亚洲无线码一区| 99国产欧美另类久久久精品| 小箩莉末发育娇小性色xxxx| 9久9久女女热精品视频在线观看| 国产无套精品一区二区| 国产av综合影院| 精品午夜中文字幕熟女人妻在线| 欧美成人免费一区二区三区视频| 狂野欧美性猛交xxxx| 久久久视频2019午夜福利| 波多野结衣一区二区三区高清| 五月天精品视频在线观看| 亚洲级αv无码毛片久久精品|