Quantcast
Channel: SPS-Forum - Automatisierung und Elektrotechnik
Viewing all articles
Browse latest Browse all 46422

TIA Per Script prüfen ob Seite existiert

$
0
0
Hallo Gemeinde,

ich habe folgendes Problem:
Ich will per Scipt prüfen ob eine Seite existiert. Falls diese nicht existiert soll das Script einfach gar nichts machen. Falls die Seite existiert soll er davon einen Screenshot erstellen.

Folgendes habe ich bereits programmiert:
Code:

Dim iPictureNumber
Dim objActiveScreen

iPictureNumber = 0

For iPictureNumber = 1 To 500 Step 1
   
    ActivateScreenByNumber iPictureNumber,0
    Set objActiveScreen = HmiRuntime.ActiveScreen

    If objActiveScreen Is Nothing Then

        DelayFunktion()     
       
    Else   
   
        DelayFunktion()       
        PrintScreen
       
    End If
   
Next

End Sub

In der Delay Funktion wird nichts anderes gemacht als eine Sekunde gewartet. Theoretisch funktioniert das Script soweit auch schon, leider kommt es immer wieder vor dass eine Seite nicht existiert und trotzdem ein Screenshot gemacht wird. Leider bin ich aktuell nirgends fündig geworden.
Ich habe aktuell TIA V14 im Einsatz mit einem TP1200 Comfort Panel.

Viewing all articles
Browse latest Browse all 46422


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>