Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

exit to windows

Created by: plenc at: 10/1/2008 12:54 PM (25 Replies)

Rating (7)

Thanks 7

Result pages:: |; 1 | 2 | 3; |

26 Entries

Entries per page: 10 | 20 | all

6/27/2010 10:40 AM	Rate (0)
HMZ Posts: 45 Rating: (4)	Dear stew, The VB script is needed because we can't use any other script at the "Menus and toolbars" tool in WinCC7. I still searching for a VB script to minimize the SCADA during runtime. Thanks
HMZ Posts: 45 Rating: (4)
Suggestion To thank Quote Answer

6/27/2010 10:50 AM	Rate (0)
Romulus Silver Member Joined: 1/4/2010 Last visit: 9/25/2024 Posts: 650 Rating: (40)	Hi you can open the WinCC Explorer with this VBS Script: Dim objWshShell Set objWshShell = CreateObject("Wscript.Shell") objWshShell.run "WinCCExplorer.exe", 1
	Regards Romulus Please give me answer if it works or if i can help you again. Sorry if my english isn't so comfortable.
Suggestion To thank Quote Answer

6/27/2010 10:53 AM	Rate (0)
HMZ Posts: 45 Rating: (4)	Hello Romulus, thank you for the reply, actually I want a VB script to minimize the SCADA window during runtime; VB is needed because C is not allowed in "Menus and toolbars" tool in WinCC7. Thanks
HMZ Posts: 45 Rating: (4)
Suggestion To thank Quote Answer

6/30/2010 11:09 AM	Rate (0)
Romulus Silver Member Joined: 1/4/2010 Last visit: 9/25/2024 Posts: 650 Rating: (40)	Hi I don't find a way with VBS because you can't declare external dll with VBS. When you find a solution. Please post it.
	Regards Romulus Please give me answer if it works or if i can help you again. Sorry if my english isn't so comfortable.
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users HMZ

7/6/2010 10:11 AM	Rate (0)
HMZ Posts: 45 Rating: (4)	Hello all, Unfortunately I couldn't made it with VB but I used the C script inside hidden object and trigred it throgh VB script. Thanks to evrybody for help
HMZ Posts: 45 Rating: (4)
Suggestion To thank Quote Answer

12/23/2011 3:38 AM	Rate (0)
Komi Posts: 291 Rating: (69)	Hi HMZ, As I know, it's possible to minimize WinCC RT Window via VBS taking use of "Tasks" object of Word Applicaton or WMI. But both of them spend time in detecting running processing & related hWnd. So I would like to suggest you to use another alternative way. Step 1: Just copy the attached "showdesktop.scf" to the root of your WinCC project folder. Step 2: And write the followings for your VB-Script. '-------------------------------------------------------------------------------------- Sub ShowDesktop(Byval Item) Dim objWshShell Set objWshShell = CreateObject("Wscript.Shell") objWshShell.Run HMIRuntime.ActiveProject.path & "\showdesktop.scf" Set objWshShell = Nothing End Sub Merry X'mas!! Komi '-------------------------------------------------------------------------------------- Attachment Minimize_WCCRT.zip (520 Downloads)
Komi Posts: 291 Rating: (69)
Suggestion To thank Quote Answer

12/23/2011 9:54 AM	Rate (0)
Komi Posts: 291 Rating: (69)	Hi, The followings work for calling from WinCC MenuBar, too! But we need to have Word.Application installed in advance. So this way is not my first recommendation ><; Just for your information: Sub OnClick(ByVal Item) Dim WD Set WD = CreateObject("Word.Application") If WD.Tasks.Exists("WinCC-Runtime -") Then WD.Tasks("WinCC-Runtime -").WindowState = 2 ' wdWindowStateMinimize End If WD.Quit Set WD = Nothing ' wdWindowStateMaximize: 1 ' wdWindowStateMinimize: 2 ' wdWindowStateNormal: 0 End Sub Best regards, Komi
Komi Posts: 291 Rating: (69)
Suggestion To thank Quote Answer

12/27/2011 4:30 AM	Rate (0)
Komi Posts: 291 Rating: (69)	Romulus Hi I don't find a way with VBS because you can't declare external dll with VBS. When you find a solution. Please post it. Hi Romulus, Happy 2012 in advance!! Just for your information that ~ Regarding calling API functions via VBS, there's a tricky way. We may take advantage of "ExcelAPP.ExecuteExcel4Macro" to take use of "User32.dll"..,etc. For example~ with regard to this subject, "exit to windows", it can be achieved by Step1. Call the "FindWindowA" to find out the window handle of WinCC-Graphics-Runtime. Step2. Call the "ShowWindow" to let the WinCC-Graphics-Runtime window minimize. I've tried the following codes successfully under WinCC V7.0 SP1, and known the child Window-Class-Name of WinCC-Graphics-Runtime (PdlRT.exe) is "PDLRTisAliveAndWaitsForYou". Sub OnClick(ByVal Item) Dim MyExcelAPP, CMD_String Dim WinCCRT_ClassName, WinCCRT_Hwnd WinCCRT_ClassName = "PDLRTisAliveAndWaitsForYou" Set MyExcelAPP = CreateObject("Excel.Application") MyExcelAPP.Visible = False CMD_String = "CALL(""user32"",""FindWindowA"",""JCJ""," & Chr(34) & WinCCRT_ClassName & Chr(34) & ",0)" WinCCRT_Hwnd = MyExcelAPP.ExecuteExcel4Macro(CMD_String) If WinCCRT_Hwnd Then CMD_String = "CALL(""user32"",""ShowWindow"",""JJJ""," & CStr(WinCCRT_Hwnd) & ",2)" 'Const SW_SHOWMINIMIZED = 2 MyExcelAPP.ExecuteExcel4Macro CMD_String End If MyExcelAPP.Quit Set MyExcelAPP = Nothing End Sub *** It will be much appreciated if someone could test above-written codes upon WinCC V7.0 SP2 and later, and let me know if the Window-Class-Name of WinCC-Graphics-Runtime is "PDLRTisAliveAndWaitsForYou", too. (If it works or not?!) Thanks in advance, Happy 2012 to everyone ;) Komi Attachment WinCC_VBS_MinimizeRT.jpg (460 Downloads)
Komi Posts: 291 Rating: (69)
Suggestion To thank Quote Answer

12/1/2015 6:41 AM	Rate (0)
Sytupit Posts: 42 Rating: (3)	Hi, I follow the SW_MINIMIZE script provided and I am able to minimize the runtime. But I have a problem here. After the runtime minimized, the screen show the desktop without the "Taskbar & Startmanu". In this case, how can I go back to the runtime? Thanks Sutupit
Sytupit Posts: 42 Rating: (3)
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Akki17_45

9/2/2019 1:19 PM	Rate (0)
Alex3110 Bronze Member Joined: 3/14/2010 Last visit: 9/4/2024 Posts: 359 Rating: (5)	F. Thomé Hi plenc!!! i think that there is 2 ideas... This script maximize the window, you can use the same script to minimize the window, using parameter SW_MINIMIZE in the Showindow() function... Hi everyone ! My question is the same like from Sytupit 1st idea works in my WinCC RT BUT after that I cann't get to WinCC RT back, because I cann't open the Windows task bar where the icon of opend WinCC RT is. In WinCC CS I locked all key short cuts - CNTR+ALT+DEL ; - ALT+TAB ; - CNTR+ESC ; - ALT+ ESC ; because of the security policy requirements. How can I get to WinCC RT back ? How to make the Windows task bar visible ?
	Last edited by: Alex3110 at: 09/02/2019 13:36:28 Last edited by: Alex3110 at: 09/02/2019 13:39:18
Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Related topics by keywords:

WinCC Picture Controls

Follow us on