WinCC 2008, Script, Aktives Bild neuladen

[Gordrin]

Zuviel Werbung?
-> Hier kostenlos registrieren

WinCC flexible 2008, Script, Aktives Bild neuladen

Guten Morgen,
ich versche momentan verzweifelt ein Script zu schreiben, mit dem ich die Aktive Seite neu laden kann.

Bisher geht das ganze nur über den Bereichszeiger, also den Umweg über die SPS. Ich will das ganze jedoch Panelintern realisieren.

Mein bisheriger Code:

'Prüfen ob Refresht werden soll (Parameter der Funktion)
If xRefresh_active = 0 Then[INDENT]Exit Sub[/INDENT]
End If

Dim strName

'Name des Aktiven Bildes ermitteln
strName = HmiRuntime.BaseScreenName

'ActivateScreen HmiRuntime.BaseScreenName, 0 'versuch das Bild über den Namen zu laden, geht leider nicht

If InStr(strName, "Trend") > 0 Then 'Prüfen ob das Aktive Bild ein Trendfenster ist, benennung unserer Trends : Bildnummer_Trend_x[INDENT]ActivateScreenByNumber SmartTags("RTO1\Pointer\R1_BildNr"), 0 'Aktives Bild neuladen, wobei die Bildnummer aus der Steuerung ausgelesen werden muss[/INDENT]
End If

Ich hoffe mir kann jemand den entscheidenden Tipp geben, bzw. einen ganz anderen weg, um ein Bild neuladen zu können.

Ziel des ganzen soll es sein den Trend Minütlich oder auf Tastendruck zu aktualisieren.
Ich will hierfür keinen paralellen Echtzeittrend einfügen.

MfG Gordrin

 

[MRose]

Hallo,

probier mal:

HmiRuntime.BaseScreenName = HmiRuntime.BaseScreenName

 

[Gordrin]

Zuviel Werbung?
-> Hier kostenlos registrieren

Ich danke dir, deine Lösung Funktioniert.
Hier das Vollständige Script

'Prüfe ob Refresht werden soll, Parameter der Funktion
If xRefresh_active = 0 Then[INDENT]Exit Sub[/INDENT]
End If
 
 Dim strName 
 strName = HmiRuntime.BaseScreenName 'Name des Aktiven Bildes
 
If InStr(strName, "Trend") > 0 Then 'Überprüfe ob es sich um ein Trendbild handelt[INDENT]HmiRuntime.BaseScreenName = strName[/INDENT]
End If

MfG Gordrin