timucincelik82
Üye
- Katılım
- 21 Kas 2009
- Mesajlar
- 58
- Puanları
- 1
- Yaş
- 41
Arkadaşlar eğer bilgisayarınızda wincc flexible üzerinden yapılmış Scada uygulaması varsa extra bir opc server almanıza gerek yok. WINCC flexible üzerindeki tüm taglara VB.net ile yazdığınız program ile haberleşebilirsiniz. Böylece raporlama yazılımlarınızı yapabilirsiniz. Ayrıca paneller üzerindende
ulaşabilirsiniz anlamına geliyor. (XML tabanlı olarak.) Yani şöyle bir örnek verebilirim.Projenizde s7200-300 de sadece 1 mpinız var ve sizden extra bir uygulama istendi. Ayrıca sisteminizde panellinizle haberleşiyor ve s7200-300 ile yazılım yazmanız raporlama vb bir iş için ya s7200-300 ethernet kartı ve üstüne opc server almanız gerek. Onun yerine panelinizdeki ethernet üzerinden s7300 ile haberleşip dataları alıyorsunuz. Raporlayıp istediğiniz scadayı yazabiliyosunuz.
Aşağıda bilgisayarınızdaki wincc flexible üzerinde çalışan örnek bir kod var. Yukarıdaki örnek için siemensin manüellerini okuyabilirsiniz. İyi çalışmalar.
Public Shared OPCServerName As String = "OPC.SimaticHMI.HmiRTm"
Public Sub Connect()
Try
obj_Server.Connect(OPCServerName)
For i As Integer = 1 To ItemsQuantity ' Yeni bir makina eklenirse +makina kadar arttirmak gerekir.
obj_item(i) = New Item(i)
obj_item(i).Group = obj_Server.OPCGroups.Add("Item" & i)
obj_item(i).Group.OPCItems.AddItem("debimetre", 1) 'Çalışıyor
AddHandler obj_item(i).DataChange, AddressOf obj_Item_DataChange
Next
obj_send_to_plc = obj_Server.OPCGroups.Add("SentToPLC")
Subscribe()
Catch ex As Exception
ExToEventLog(ex.ToString)
End Try
End Sub
ulaşabilirsiniz anlamına geliyor. (XML tabanlı olarak.) Yani şöyle bir örnek verebilirim.Projenizde s7200-300 de sadece 1 mpinız var ve sizden extra bir uygulama istendi. Ayrıca sisteminizde panellinizle haberleşiyor ve s7200-300 ile yazılım yazmanız raporlama vb bir iş için ya s7200-300 ethernet kartı ve üstüne opc server almanız gerek. Onun yerine panelinizdeki ethernet üzerinden s7300 ile haberleşip dataları alıyorsunuz. Raporlayıp istediğiniz scadayı yazabiliyosunuz.
Aşağıda bilgisayarınızdaki wincc flexible üzerinde çalışan örnek bir kod var. Yukarıdaki örnek için siemensin manüellerini okuyabilirsiniz. İyi çalışmalar.
Public Shared OPCServerName As String = "OPC.SimaticHMI.HmiRTm"
Public Sub Connect()
Try
obj_Server.Connect(OPCServerName)
For i As Integer = 1 To ItemsQuantity ' Yeni bir makina eklenirse +makina kadar arttirmak gerekir.
obj_item(i) = New Item(i)
obj_item(i).Group = obj_Server.OPCGroups.Add("Item" & i)
obj_item(i).Group.OPCItems.AddItem("debimetre", 1) 'Çalışıyor
AddHandler obj_item(i).DataChange, AddressOf obj_Item_DataChange
Next
obj_send_to_plc = obj_Server.OPCGroups.Add("SentToPLC")
Subscribe()
Catch ex As Exception
ExToEventLog(ex.ToString)
End Try
End Sub
