伊人激情av一区二区三区,亚洲乱亚洲乱妇,女逼穴穴抽插下载上厕所,国产呦系列视频在线观看

sxd566
級(jí)別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(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)表格中測試是可以的

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

无码精品黑人一区二区三区| 国产精品久久久久精品二级| 帅哥大鸡操美女| 国产精品18久久久久久ⅹ| 初毛初精小男生gv网址| 亚洲 欧洲 国产 综合| 男生鸡拥女生屁动漫网站| 激情国产a视频| 日韩97精品一区二区三区| 欧美国产婷婷| 亚洲黄在线观看| 艹我嗯啊哈视频| 波多野结衣av一区二区| 美女热情大鸡巴| 日本丰满风骚巨乳美少妇| 操的真舒服使劲操的视频| 国产美女直播亚洲一区色| 国产主播福利片在线观看| 青娱乐国产一区| 欧美视频区高清视频播放| 鸡巴小穴www黄色网站| 男人的j桶女人免费网站| 国产人妻丰满熟妇嗷嗷叫| 国产又粗又长又猛又爽视频| 鸡巴操小穴视频在线观看| 亚洲国产精品一区二区WWW| 亚洲欧美中文日韩v日本| 日韩欧美久久久一区二区| 欧美牲交a欧美牲交| 黄网址在线观看| 打几把抽查视频| 自拍偷拍亚洲激情欧美激情| 春宵福利导航。| 国产富婆做全套视频高潮| 大屌操骚逼视频| 我和亲妺妺乱的性视频| 久久久久久久打飞机电影| 欧美日韩午夜福利一区二区| 日韩欧美精品一区二区蜜臀| 高清性做爰伦理| 中文字幕制服丝袜人妻诱惑|