国产一区视频在线观看-国产重口老太和小伙-亚洲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語句在報表編輯器中的動態表格中測試是可以的

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

主站蜘蛛池模板: 扒开双腿疯狂进出爽爽爽视频| 成年美女黄网站18禁免费| 色偷偷88888欧美精品久久久| 永久黄网站色视频免费看| 国产精品亚洲视频在线观看| 欧美牲交a欧美在线| 一区二区三区高清视频一| 亚洲国产熟妇在线视频| 国产艳妇av在线观看果冻传媒| 国产精品久久久久久日本| 伊人久久大香线蕉av色婷婷色| 九九九免费观看视频| 久久免费精品国产72精品九九 | 日日日日做夜夜夜夜做无码| 97色成人综合网站| 亚洲欧美在线制服丝袜国产| 国产成人无码午夜视频在线观看| 久久综合97丁香色香蕉| 又污又爽又黄的网站| 国产免费人成视频在线观看| 国产亚洲人成网站在线观看琪琪秋 | 三级大片在线观看| 亚洲香蕉aⅴ视频在线播放| 国产精品人妻一区二区三区四| 欧美牲交a免费| 无码免费午夜福利片在线| 亚洲色欲啪啪久久www综合网| 性xxxx欧美老妇胖老太269| 久久精品国产精品| av一区二区三区人妻少妇| 粉嫩av国产一区二区三区| 无码gogo大胆啪啪艺术| 国产无遮挡一级毛片| 亚洲日韩av一区二区三区四区| 97精品久久天干天天天按摩| 色欲狠狠躁天天躁无码中文字幕| 国产免国产免‘费| 少妇激情av一区二区| 中文字幕av高清片| 在线观看肉片av网站免费| 成人区人妻精品一区二区不卡 |