麻豆一区区三三四区产品麻豆-麻豆影视国产TV在线观看-麻豆影视国产在线观看-麻豆影视在线-麻豆影视在线观看av-麻豆影院

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

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

主站蜘蛛池模板: 久久久国产人妻精品| 色综合久久白洁| eeuss鲁片一区二区三| 亚洲v无码专区国产观看一区| 99无码人妻| 日本人成精品视频在线| 亚洲一卡2卡3卡4卡乱码网站| 免费又色又爽又黄的小说软件| 成人国产| 精品国产9999一区二区三区| 亚洲国产精品专区欧美 | 国产又色又粗又黄又爽免费| 成人无码区免费A片视频韩国| 国产成人无码区在线观看| 亚洲国产精品无码久久久蜜芽 | 久久久久久久99精品免费观看| 久久精品人妻一区二区三区| 国产精品人妻一区二区高| 国产成人精品日本亚洲一区 | 精品亚洲大全| 99久久国产露脸精品竹菊传煤| 国产精品爆乳在线播放第一人称| 亚洲欧美日韩国产一区二区| 69久久精品无码一区二区无码奇幻| 欧美精品一卡二卡| 一本道久久爱88AV俺也去| 国产啪亚洲国产精品无码 | 男女啪啪抽搐高潮动态图| 亚在线观看免费视频入口| 国产毛片| 亚洲日本精品中文字幕久久| 2024av伦理片| 欧美亚洲中文字幕的影片| 欧美在线三级艳情网站| 国产偷国产偷亚洲高清人乐享| 在线一区二区三区| 不卡无码在线观看视色| 少妇内射HD| 国产精品卡一卡2卡三卡网站| 精品久久伦理中文字幕| 成在线人免费无码高潮喷水|