国产一区视频在线观看-国产重口老太和小伙-亚洲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片| 综合三区后入内射国产馆| 久久99精品久久久久婷婷暖| 人妻洗澡被强公日日澡| 无码aⅴ免费中文字幕久久| 色诱视频在线观看| 国产欧美亚洲一区| 自拍偷自拍亚洲精品10p| 中文字幕丝袜精品久久| 亚洲国产成人精品无码区在线秒播| 国产精品免费视频网站| 国内揄拍高清国内精品对白| 国产在线观看www污污污| 国产又色又爽又黄的免费| 午夜影视啪啪免费体验区入口| 色8久久人人97超碰香蕉987 | 欧美国产激情18| 久久人搡人人玩人妻精品首页| 亚洲精品nv久久久久久久久久| 国产视频 每日更新| 国产午夜高潮熟女精品av软件| 国产口爆吞精在线视频| 国产玖玖玖玖精品电影| 欧美牲交a欧美在线| 春药按摩人妻弓中文字幕| 亚洲色婷六月丁香在线视频| 亚洲精品国产熟女久久久| 国产精品一区二区高清在线| 精品国产一区二区三区久久| 成年站免费网站看v片在线| 水蜜桃色314在线观看| 日韩国产午夜在线精品| 胸大美女又黄的网站| 日出水了特别黄的视频| 波多野结衣av无码| 欧美日产亚洲国产精品| 色婷婷五月综合亚洲小说| 欧美精品国产aⅴ一区二区在线 | 人妻少妇不满足中文字幕|