国产一区视频在线观看-国产重口老太和小伙-亚洲v高-中文岛国精品亚洲一区亚-免费a级毛片出奶水-黄网站入口

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

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

主站蜘蛛池模板: 亚洲成在人线视av| 色妺妺视频网| 无码少妇一区二区性色av| 中国农村熟妇性视频| 欧美牲交a欧美牲交aⅴ免费真| 亚洲欧洲自拍拍偷综合| 波多野结衣美乳人妻hd电影欧美| 免费女人高潮流视频在线观看| 中文字幕欧美日韩va免费视频| 免费观看性欧美大片无片| 亚洲成在人线av中文字幕喷水 | аⅴ资源中文在线天堂| 伊人av超碰伊人久久久| 四虎影视4hu4虎成人| 无码视频免费一区二三区| 日韩精品无码成人专区| 无码少妇丰满熟妇一区二区| 岛国4k人妻一区二区三区| 国产偷v国产偷v亚洲高清| 国产精品老熟女露脸视频| 香蕉免费一区二区三区| 久久久久蜜桃精品成人片| 欧美zozo另类特级| 特级欧美插插插插插bbbbb | 丰满老熟女毛片| 久久国产精品99国产精| 狠狠色丁香五月综合缴情婷婷五月 | 无码日韩精品国产av| 亚洲国产精品久久久久秋霞影院| 国产欧美日韩高清在线不卡| 男女裸交免费无遮挡全过程| 午夜家庭影院| 日本黄页网站免费观看| 无码aⅴ在线观看| 亚洲 日韩 另类 制服 无码| 国产精品久久久久久久久久久久午衣片 | 伊人久久大香线蕉综合网站| 人妻夜夜爽天天爽一区| 国产精品盗摄!偷窥盗摄| 亚洲成亚洲乱码一二三四区软件| 日韩av片无码一区二区不卡电影 |