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

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

主站蜘蛛池模板: 国产极品视觉盛宴| 亚洲精品久久久久午夜福禁果tⅴ| 亚洲一本大道无码av天堂| 亚洲日本在线电影| 久久精品国产欧美| 人人做人人爽久久久精品| 久久精品欧美日韩精品| 国产国产成年年人免费看片| 无码丰满少妇2在线观看| 国产精品亚洲专区无码影院| 天天狠天天天天透在线| 自拍啪啪| 丁香啪啪综合成人亚洲| 国产一区二区精品久久岳| 国产午夜精品一区二区三区软件| 国产特黄级aaaaa片免| 狠狠爱亚洲综合久久| 熟女人妇交换俱乐部| 91天堂国产在线| 麻豆视频秘密入口| 午夜成午夜成年片在线观看| 日本护士╳╳╳hd少妇| 97香蕉超级碰碰碰久久兔费| 18女下面流水不遮图| 亚洲欧美日韩在线不卡 | 亚洲一本到无码av中文字幕| 成人网站免费观看| 无码一区二区三区亚洲人妻| 99精品偷自拍| 色多多性虎精品无码av| 亚洲精品久久久久久下一站 | 别揉我奶头~嗯~啊~一区二区三区| 人妻夜夜爽天天爽三区丁香花| 日本无码人妻波多野结衣| 少妇的渴望hd高清在线播放| 国产精品久aaaaa片| 天堂网www在线资源网| 国精产品一品二品国在线| 欧美亚洲国产精品久久| 久久久久国产精品麻豆ar影院| 国产三级影院|