欧美鲁鲁_啦啦啦啦在线观看_日韩精品短视频_玩偶姐姐作品在线观看_天天综合天天做天天综合_国产综合图区

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

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

主站蜘蛛池模板: 强壮的公弄得高潮HD | 国产黄a三级三级三级看三级男男 | 黄色在线播放 | 销魂美女图片一二三区 | 亚洲精品永久免费 | 久久精品中文騷妇女内射 | 国产精品成人永久在线四虎 | 国产午夜亚洲精品国产成人小说 | 国产人妻精品无码AV在线 | 在线观看美女黄视频 | 性欧美性欧美 | 漂亮的丰满人妻中文字幕 | 另类精品 | 亚洲AV无码专区色爱天堂老鸭窝 | 污污网站在线免费看 | av无码国产精品色午夜 | 国产精品全新69影院在线看 | 91九色在线观看 | 东京热AV人妻无码A片 | 攵女乱h系列合集多女国产剧 | 最好看的2018中文字幕免费视频 | 欧洲色综合 | 国精品产一区二区三区在线播放 | 久久久亚洲欧洲日产国码二区 | 国产精品亚洲А∨天堂网 | 麻豆网址大全 | 国产一区二区视频免费观看 | 丰满护士巨好爽好大乳小说 | 久久国产色综合 | 国产又粗又猛又黄又爽的视频 | 国产亚洲精品精华液 | 国产丰满老熟妇乱xxx1区 | 一级毛片毛片 | 日韩av片无码一区二区不卡电影 | 久久少妇精品 | 中文字幕综合视频 | 国产精品视频一区二区三区四区五区 | 无码丰满熟妇一区二区密臀 | 天天做天天爱天天爽 | 成熟丰满熟妇高潮XXXXX | 亚洲国产久 |