Step 5 S5 mit vb.net steuern

[benni853]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo Erstmal an alle von dem neuen.

Nun auch gleich mein erstes Problem.

wie kann ich über ein vb prog s5 eingänge lesen bzw merker in der sps setzen
komme mit libnodave überhaupt nicht klar.

auch über wincc wäre es vieleicht möglich so csv auslesen und schreiben.

über die hilfe wäre ich echt dankbar

 

[StefanK]

komme mit libnodave überhaupt nicht klar.

Wo genau ist dein Problem mit libnodave? Habe vor einiger Zeit eine S5 mit libnodave mit VB.net gemacht.
Was hast du schon?

 

[benni853]

Zuviel Werbung?
-> Hier kostenlos registrieren

Naja bin bis jetzt noch nicht dahinter gekommen wie ich eine s5 ansteuer, habe bis jetzt nur mit mpi für s7 hin bekommen
oder über lan kannst mir das prog zukommen lassen?

 

[StefanK]

Das ist ein Ausschnitt aus meinem Programm:

eventuell hilft es, ansonsten poste mal deinen Code:

    Private fds(2) As libnodave.daveOSserialType
    Private di(2) As libnodave.daveInterface
    Private dc(2) As libnodave.daveConnection


    Public CONNECTION_STATUS_OK(2) As Boolean

fds(1).rfd = libnodave.setPort("COM2", "9600", AscW("E"))
                    fds(1).wfd = fds(1).rfd


                    If fds(1).rfd > 0 Then
                        di(1) = New libnodave.daveInterface(fds(1), "S5", 0, libnodave.daveProtoAS511, libnodave.daveSpeed187k)
                        res = di(1).initAdapter


                        If res = 0 Then
                            di(1).setTimeout(500000)
                            dc(1) = New libnodave.daveConnection(di(1), 2, 0, 0)
                            res = dc(1).connectPLC
                            If res = 0 Then
                                Return True
                            Else
                                Call Disconnect(1)
                                Return False
                            End If
                        Else
                            libnodave.closePort(fds(1).rfd)
                            Return False
                        End If
                    Else
                        Return False
                    End If

 

[benni853]

Coole sache muss ich mal testen denk sollte passen genau die stütze hat mir geholfen

nur noch eins als was hast du res deklariert

 

[StefanK]

Zuviel Werbung?
-> Hier kostenlos registrieren

Als Integer, wenn die Funktionen 0 zurückgeben, ist alles gut.

 

[gerulus]

Eine andere Lösung ist S5-LAN. Einfach auf die PG-Schnittstelle stecken und kommunizieren, als es eine S7 wäre. Zudem noch zeitgleich per LAN pro programmieren.
Gruss Alois

 

[StefanK]

Eine andere Lösung ist S5-LAN. Einfach auf die PG-Schnittstelle stecken und kommunizieren, als es eine S7 wäre. Zudem noch zeitgleich per LAN pro programmieren.
Gruss Alois

Nettes Teil + netter Preis. Welches Stück Software brauche ich dann noch, damit die S5 mit einem .net- Programm spricht?

PS: gibt es wirklich noch so viele S5 im Feld? Die letzten fünf, auf die ich getroffen bin sind gegen S7 oder Beckhoff rausgeflogen...

 

[gerulus]

Zuviel Werbung?
-> Hier kostenlos registrieren

Für das S5-LAN und S7-LAN haben wir eine sehr günstige Variante unserer IP-S7-LINK Library. Diese nennt sich dann S7-LAN-LINK.
ggf. direkt anfragen. Auch LibNoDave für S7 würde gehen.
Zum anderen ist dir ein offenes Protokoll implementiert. Hier die Beschreibung des S5-LAN-Protokolls:

Das Themas S5 ist so, dass die SPS selbst unverwüstlich ist. Die OP's hingegen gehen kaputt. Mit S5-LAN kann jeder S7-OPC-Server, jedes WinCC etc. mit der S5 kommunizieren, als ob diese eine S7 wäre. Ja auch eine S7/S5-Kopplung über PUT/GET ist möglich.

Gruss Alois