欧美 日韩 国产 成人 在线观看丨欧美综合自拍亚洲综合图丨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語句在報表編輯器中的動態表格中測試是可以的

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

主站蜘蛛池模板: 日韩人妻无码一区二区三区| 人妻无码中文久久久久专区| 国产欧美综合一区二区三区| 九九九免费观看视频| 中文乱码字慕人妻熟女人妻| 日本边添边摸边做边爱的网站| 少妇荡乳情欲办公室456视频| 亚洲肥老太bbw中国熟女| 伊人大香人妻在线播放| 一区二区三区人妻无码| 国产精品99久久久久久www| 免费无码av片在线观看网站| 99精品国产自在现线10页| 亚洲aⅴ无码专区在线观看| 中国丰满人妻videoshd| 亚洲综合日韩av无码毛片| 蜜桃视频网站| 国产亚洲精品久久久久的角色| 中国xxxx做受视频| 欧洲欧美人成视频在线| 东京热人妻无码人av| 思热99re视热频这里只精品| 久久亚洲精品人成综合网| 永久免费的av在线电影网| 寂寞人妻瑜伽被教练日| 免费真人h视频网站无码| 免费人成在线视频无码| 日韩做a爰片久久毛片a片| 久久影院综合精品| 无毒的av网站| 黑人与中国少妇xxxx视频在线| 日韩国产高清一区二区| 桃花岛亚洲成在人线av| 精品人妻二区中文字幕| 久久人人97超碰国产精品| 失禁大喷潮在线播放| 日本老熟妇乱| 天天做天天爱夜夜爽女人爽 | 中文字幕免费无码专区剧情| 国产又大又粗又爽的毛片| 欧美黑人又大又粗xxxxx|