plcforum.uz.ua

International PLC Forum
It is currently Tue Oct 23, 2018 12:16 am

All times are UTC + 3 hours


Forum rules


Please click here to view the forum rules



Post new topic Reply to topic  [ 3 posts ] 
Author Message
 Post subject: XML и WinCC
PostPosted: Sat Sep 27, 2014 9:25 pm 

Joined: Wed Oct 13, 2010 11:44 am
Posts: 233
Location: Russian Federation
Есть у нас проприетарный панельный компьютер-моноблок с сенсорным экраном, управляющий оборудованием, и собирающий информацию с датчиков. Панель работает под управлением Linux.
OPC-сервер для него стоит много тугриков, начальство задушено жабой.

Обнаружено, что на панели запущен веб-сервер, которому можно посылать запросы в виде примерно такого URL:
Code:
http://IP_адрес_панели/getvalbyname?имя_переменной_1&имя_переменной_2&...и т.д.

Результат возвращается в виде читабельного XML-файла.

Вопрос: можно ли как-то обучить WinCC такому трюку? (посылка URL и парсинг XML)
Может быть есть какой-нибудь бесплатный OPC-сервер, который сможет делать эту работу между панелью и WinCC?
Может быть есть какой-нибудь софт, который сможет получать XML, парсить из него тэги и писать сразу в SQL-базу WinCC?
Ну, или какие-нибудь другие варианты.


Top
 Profile  
 
 Post subject: Re: XML и WinCC
PostPosted: Sat Sep 27, 2014 9:45 pm 
Site Admin

Joined: Wed Sep 06, 2006 3:03 pm
Posts: 1097
Location: CIS
Скриптами можно попробовать. Вот пример с официального форума:
Code:
Sub readXML

Dim xml
Dim rc
Dim nodes
Dim i
Dim sz
Dim txtTest
   rc = False
   Set xml = CreateObject("Msxml2.DOMDocument")
   xml.validateOnParse = True
   xml.async = False
HMIRuntime.Trace "XML:Load begin" & vbCrLf
   rc = xml.load("http://localhost/xml/data_in.xml")
HMIRuntime.Trace "XML:Load return code: " & rc & vbCrLf
   Set nodes = xml.selectNodes("DeviceTypes/DeviceType/Name")
   sz = nodes.length
HMIRuntime.Trace sz & vbCrLf
   Set txtTest = HMIRuntime.Tags("txtTest")
   For i=1 To sz
      txtTest.Value = nodes.item(i).text
      HMIRuntime.Trace vbTab & txtTest.Value & vbCrLf
      txtTest.Write   
   Next
HMIRuntime.Trace "XML:Parse end" & vbCrLf
   Set xml = Nothing
End Sub


Top
 Profile  
 
 Post subject: Re: XML и WinCC
PostPosted: Fri Oct 03, 2014 2:59 pm 

Joined: Wed Oct 13, 2010 11:44 am
Posts: 233
Location: Russian Federation
Спасибо большое! После адаптации под наш XML всё заработало!


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 3 posts ] 

All times are UTC + 3 hours


Who is online

Users browsing this forum: No registered users and 3 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum

Search for:
Jump to:  
Powered by International PLCforum® Forum Software © PLCforum
Mobile version