免费国精产品自偷自偷免费看_在线看片成人_www.77伦理bt.com_特级黄色一级片_免费夜色污私人影院在线观看_国严精品久久久久久亚洲影视

sxd566
級(jí)別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊(cè)時(shí)間: *
最后登錄: *
查看sxd566的 主題 / 回貼
樓主  發(fā)表于: 2011-10-08 13:46
我剛接觸wincc,現(xiàn)在要在wincc里做一個(gè)月報(bào)表,需要每天在當(dāng)天結(jié)束時(shí)將數(shù)據(jù)庫中的日表里的每項(xiàng)數(shù)據(jù)讀出來求平均值再寫入月表里,現(xiàn)在沒辦法實(shí)現(xiàn)數(shù)據(jù)讀取,可能是連接不到數(shù)據(jù)庫,
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() '系統(tǒng)時(shí)間
    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語句在報(bào)表編輯器中的動(dòng)態(tài)表格中測(cè)試是可以的

哪位高手知道的指點(diǎn)一下,急~~~~~

主站蜘蛛池模板: 欧美成人免费一级人片100 | 最近免费观看高清日本大全 | 欧美另类在线视频 | 欧美不卡在线一区二区三区 | 国产成人不卡 | 久久久精品| 四虎影视在线影院在线观看免费视频 | 999久久久精品免费毛片 | 亚洲综合成人婷婷五月网址 | 偿还的影视高清在线观看 | 中文天堂在线观看 | 奇米视频在线 | 激情aⅴ欧美一区二区三区 av狼友永久免费网址观看 | 97色伦欧美一区二区日韩 | 一区二区三区区四区播放视频在线观看 | 国产成人亚洲精品影院 | 久久精品成人一区二区三区蜜臀 | 99精品综合加勒比在线观 | 日本黄色网站在线观看 | 亚洲日本一区二区三区在线不卡 | av色国产色拍 | 忘忧草精品久久久久久久高清 | 四虎影院视频 | 国产午夜一级一片免费播放 | 91久久久精品国产一区二区 | 免费人成网站在线视频 | 欧美视频自拍 | 欧美日韩中文亚洲 | 国内91在线 | 啊啊啊操的好爽 | 丁香婷婷色综合激情五月 | 欧洲免费看片尺码大 | 内射小寡妇无码 | 久久视频精品在线 | 精品一区二区三区视频在线观看 | 日本三级色片 | 国产精品久久久福利 | 美女视频黄频大全免费 | 亚洲综合中文字幕一区二区 | 少妇做受xxxxⅹ高潮片 | 久热这里只精品国产8 |