国产一区视频在线观看-国产重口老太和小伙-亚洲v高-中文岛国精品亚洲一区亚-免费a级毛片出奶水-黄网站入口

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

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

主站蜘蛛池模板: 无码人妻黑人中文字幕| 思思99re6国产在线播放| 亚洲第一在线播放| 亚洲色欲或者高潮影院| 国产成人精品一区二区三区无码 | 丁香五月激情缘综合区| 国精产品一区一区三区有限在线 | 最新亚洲精品国偷自产在线| 亚洲不卡av不卡一区二区| 欧美大屁股流白浆xxxx| 亚洲国产av无码精品| 亚洲国产成人高清影视| 日本三级香港三级三级人!妇久| 中文字幕亚洲精品乱码| 色一情一区二区三区四区| 天天爽狠狠噜天天噜日日噜| 欧美天天综合色影久久精品| 无码国产精品一区二区av| 国产粉嫩高中无套进入| 中文字幕高清免费日韩视频在线| 又粗又猛又爽黄老大爷视频| 国产精品丝袜久久久久久不卡| 国产白丝精品爽爽久久蜜臀| 精品久久久无码人妻字幂| 影音先锋人妻av中文字幕久久| 久久天天躁狠狠躁夜夜96流白浆| 嫩b人妻精品一区二区三区| 国产偷国产偷亚洲高清日韩| 亚洲精品日本久久一区二区三区| 久久婷婷五月综合成人d啪| 67194熟妇人妻欧美日韩| 又大又爽又黄无码a片| 亚洲精品国产成人| 亚洲精品国产品国语在线| 国产欧美精品一区二区三区四区| 亚洲精品第一国产综合麻豆| 蜜臀av无码一区二区三区| 久久的爱久久久久的快乐| 性裸交a片一区二区三区| 四虎影视国产精品永久在线| 激烈的性高湖波多野结衣|