亚洲国产精品一区二区久久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)一下,急~~~~~

主站蜘蛛池模板: 丰满少妇被猛烈进入流水| 国产成人免费一区二区三区| 2021在线精品自偷自拍无码| 天堂在/线中文在线| 无码综合天天久久综合网| 亚洲av无码一区二区三区鸳鸯影院| 国产女同疯狂作爱系列| 国产av一区二区三区| 国语对白做受xxxxx在| 亚洲国产精品热久久| 日韩精品无码av成人观看| 欧美大胆a级视频免费| 狠狠色噜噜狠狠狠777米奇小说 | 亚洲国产超清无码专区| 久久精品国产亚洲av麻豆蜜芽| 狠狠色丁香婷婷综合尤物| 妺妺窝人体色www看人体| 男女高潮又爽又黄又无遮挡 | 四虎影院海外永久| 久久人妻内射无码一区三区| 中国性少妇内射xxxx狠干| 国产日产欧产精品精品软件| 亚洲国产精品久久人人爱| 国产午夜无码福利在线看网站| 成人免费的视频| 久久综合九色综合久99| 午夜视频体内射.com.com| 精产国品一二三产区蘑菇视频| 无码乱肉视频免费大全合集| 日本边添边摸边做边爱边| 日本精品一区二区三区在线视频| 大肉大捧一进一出好爽mba| 在线精品无码字幕无码av| 鲁丝片一区二区三区免费| 久久久久久久久蜜桃| 亚洲av无码专区在线电影| 亚洲字幕av一区二区三区四区| 日韩欧美激情兽交| 成年女人永久免费看片| 亚洲av中文无码乱人伦在线观看| 久久精品国产亚洲av网站|