国产一区视频在线观看-国产重口老太和小伙-亚洲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語句在報表編輯器中的動態表格中測試是可以的

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

主站蜘蛛池模板: 国产午夜人做人免费视频网站| 精品国产情侣高潮露脸在线| 天天狠天天透天干天天| 欧美gv在线观看| 夜夜影院未满十八勿进| 精品无码无人网站免费视频| 东京热加勒比无码少妇| 亚洲午夜成人av电影| 肥老熟妇伦子伦456视频| 1000部啪啪未满十八勿入| 国产日韩综合av在线观看一区| 国产精品无码午夜免费影院| 男女啪啪抽搐呻吟高潮动态图| 国产自产v一区二区三区c| 亚洲欧美日韩国产成人| 久久天天躁狠狠躁夜夜2019| 麻豆精品久久久久久久99蜜桃| 久久久综合亚洲色一区二区三区 | 免费国产高清在线精品一区| 精品人妻少妇一区二区三区 | 制服国产欧美亚洲日韩| 亚洲欧洲成人av每日更新| 久久天天婷婷五月俺也去| 精产国品一二三产区m553麻豆| 亚洲欧美成| 亚洲精品亚洲人成在线观看下载| 久久久久久亚洲精品中文字幕| 亚洲愉拍二区一区三区| 成年无码av片完整版| 亚洲欧美日本中文字不卡| 亚洲不卡av一区二区三区| 日韩人成免费网站大片| 边做饭边被躁bd苍井空图片| 久久无码av中文出轨人妻| 亚洲欧洲日韩在线电影| 色爱情人网站| 国产精品综合色区| 无码一区二区三区久久精品| 少妇高潮喷水在线观看| 18禁成年无码免费网站无遮挡| 亚洲日韩v无码中文字幕|