伊人激情av一区二区三区,亚洲国产精品一区二区制服,国产高潮流白浆喷水免费,老外插女人视频

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

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

欧美真实人妻故事无删减| 国产精品污网站在线观看| 91福利国产成人精品播放| 男女激情啪啪啪国产精品| 草草噜噜噜久久久久久久| 91麻豆视频免费下载版| 亚洲加勒比?妇无码AV| 作爱激烈叫床视频大尺度| 久草AV色闺蜜AV在线| 男人和女人操逼免费视频| 黄是色操逼鸡巴| 日本免费a^视频一区二区| 久久久久久久久av毛片| 大鸡巴插骚女逼淫荡视频| 日本成本人三级在线观看| 二次元男生操女生屁眼爽| 成人在线理论片| 欧美久久伊人| 午夜强奸电影网| 成年无码按摩av片在线| 国产精品国产精品偷麻豆| 亚洲色欲久久久久综合网| 三上悠亚在线观看91p| 日本欧美大码a在线播放| 色欲ΑV蜜臀Α| 鸡鸡插骚逼网站| 无码成人在在线在线观看| 大炕上翁熄粗大交换刘雪| 禁18免费啪视频色多多| 亚洲精品成人18久久久久| 99热最新在线免费观看| 国产精品日韩一区二区三区| 伊人五月天在线观看视频| 男女嗯嗯的视频在线观看| 人妻乱人伦中文字幕在线| 女的被男的操的免费网站| 男生操女生的免费小视频| 综合久久—本道中文字幕| 少妇熟女一区二区三区aⅴ| 啊~啊啊操逼别c了视频| 好大?用力?深一点成人|