亚洲国产精品一区二区久久hs,国产精品久久久久久久久久直播,亚洲人成色7777在线观看不卡,国产亚洲精品久久19p,免费无码又爽又刺激高潮视频

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ù)庫(kù)中的日表里的每項(xiàng)數(shù)據(jù)讀出來(lái)求平均值再寫入月表里,現(xiàn)在沒(méi)辦法實(shí)現(xiàn)數(shù)據(jù)讀取,可能是連接不到數(shù)據(jù)庫(kù),
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語(yǔ)句在報(bào)表編輯器中的動(dòng)態(tài)表格中測(cè)試是可以的

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

主站蜘蛛池模板: 五月开心播播网| 亚洲国产精品成人无码区| 乱人伦人妻中文字幕无码| 男女高潮激烈免费观看| 50岁老熟女高潮喷水| 黑人处破女免费播放| 狂野欧美性猛交xxxx| 国产极品白嫩精品| 一本色道无码道dvd在线观看 | 中文字幕人妻丝袜成熟乱| 蜜桃日本免费观看mv| 欧美怡春院一区二区三区| 狠狠色综合网久久久久久| 国产肥熟女视频一区二区三区| 亚洲av专区无码观看精品天堂| 比比资源先锋影音网| 国产精品女人呻吟在线观看| 亚洲一区精品无码色成人| 亚洲av日韩aⅴ无码色老头| 无翼乌工口肉肉无遮挡无码18| 欧美xxxx黑人又粗又长精品 | 国产成人精品日本亚洲| 欲妇荡岳丰满少妇岳| 丰满少妇三级全黄| 精品久久久久久久免费人妻| av永久天堂一区二区三区| 国产无遮挡又黄又爽网站| 国产av旡码专区亚洲av苍井空| 老熟女高潮喷水了| 亚洲精品456在线播放| 欧美三级不卡在线观看| 乱人伦中文无码视频| 色翁荡熄又大又硬又粗又视频 | 亚洲美女又黄又爽在线观看| 欧美巨大xxxx做受中文字幕| 亚洲色丰满少妇高潮18p| 欧美激情视频一区二区三区免费| 77777亚洲午夜久久多人| 人人妻人人澡人人爽人人精品 | 亚洲av成人一区二区三区| 色综合久久久久无码专区|