Skip to Content

SiePortal

The integrated platform for your product selection, buying and support workflow - bringing together Industry Mall and Online Support.

SiePortalDeutsch

Search

Home
Support Support
{{(apiData.Support | filter:{'rank':1}:true)[0].title}} Support
- Menu temporary not available
- Menu temporary not available
- Menue temporary not available
- {{item.title}}

Products & Services
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
Support Support
{{(apiData.Support | filter:{'rank':1}:true)[0].title}} Support
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
MySiePortal MySiePortal
{{(apiData.MySiePortal | filter:{'rank':1}:true)[0].title}} MySiePortal
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
Cart ({{apiData.CartCount}})

Navigation

debugging in VBS

Created by: Janac at: 2/26/2009 6:29 PM (7 Replies)

Rating (2)

Thanks 6

8 Entries

2/26/2009 6:29 PM	Rate (0)
Janac Posts: 134 Rating: (11)	Hi, I am having trouble debugging in Visual Basic in WinCC, i cant remember method but i think it is debug.print, but it doesnt work. I want to see some variable or message in APDiag on OutputWindow. i tried this way: Dim sSCADA_NUMBER . . sSCADA_NUMBER = HMIRuntime.Tags("SCADA_01_NUMBER").Read . . debug.print sUNIT_NUMBER ============Microsoft VBScript runtime error============ Application : Picture : SCADA_01_Batch_Phase_Parameters.pdl_Events Function : Sub Document_OnOpen() Line : 25 Error : Object doesn't support this property or method: 'debug.print' ============Microsoft VBScript runtime error============ i tried also debug.print "asdf" also it doesnt work
Janac Posts: 134 Rating: (11)
Suggestion To thank Quote Answer

2/26/2009 7:13 PM	Rate (1)
uel123 Gold Member Joined: 1/29/2006 Last visit: 1/18/2026 Posts: 451 Rating: (65)	Janac Hi, I am having trouble debugging in Visual Basic in WinCC, i cant remember method but i think it is debug.print, but it doesnt work. I want to see some variable or message in APDiag on OutputWindow. i tried this way: Dim sSCADA_NUMBER . . sSCADA_NUMBER = HMIRuntime.Tags("SCADA_01_NUMBER").Read . . debug.print sUNIT_NUMBER ============Microsoft VBScript runtime error============ Application : Picture : SCADA_01_Batch_Phase_Parameters.pdl_Events Function : Sub Document_OnOpen() Line : 25 Error : Object doesn't support this property or method: 'debug.print' ============Microsoft VBScript runtime error============ i tried also debug.print "asdf" also it doesnt work Try this: Dim IRet IRet = MsgBox("Scada Numberis:"& sSCADA_NUMBER&vbCr,vbOKCancel) If IRet<>1 Then Exit Sub You can see your variable in message box......... Have fun! uel123

Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Janac

2/27/2009 9:05 AM	Rate (1)
mkolata Posts: 25 Rating: (3)	Hi, to display messages in APDiag use HMIRuntime.Trace "Hello World " & myVar & vbNewline
mkolata Posts: 25 Rating: (3)
Suggestion To thank Quote Answer
This contribution was helpful to 2 thankful Users Janac AlexEPro

2/27/2009 10:36 AM	Rate (0)
Janac Posts: 134 Rating: (11)	mkolata Hi, to display messages in APDiag use HMIRuntime.Trace "Hello World " & myVar & vbNewline It works perfectly, Thank you. And message box function from user uel123 doesnt work with underscores (_) like this: Dim IRet Dim temp temp=sSCADA_NUMBER IRet = MsgBox("Scada Numberis:"& temp&vbCr,vbOKCancel)
Janac Posts: 134 Rating: (11)
Suggestion To thank Quote Answer

2/27/2009 11:03 AM	Rate (0)
uel123 Gold Member Joined: 1/29/2006 Last visit: 1/18/2026 Posts: 451 Rating: (65)	Hm......very strange! On my computer (Wincc V6.2, SP2), works perfectly OK also with underscores...... ...... Sub procedure1 Dim sString_with_underscore, Iret sString_with_underscore = HMIRuntime.Tags("krneki").Read IRet = MsgBox("Scada Number is:"&sString_with_underscore&vbCr,vbOKCancel) If IRet<>1 Then Exit Sub End Sub ........ ????

Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Janac

2/27/2009 3:27 PM	Rate (0)
Janac Posts: 134 Rating: (11)	currently im using 6.0 sp3 and it does not work, but no error message is displayed in the output window also. uel123 Hm......very strange! On my computer (Wincc V6.2, SP2), works perfectly OK also with underscores...... ...... Sub procedure1 Dim sString_with_underscore, Iret sString_with_underscore = HMIRuntime.Tags("krneki").Read IRet = MsgBox("Scada Number is:"&sString_with_underscore&vbCr,vbOKCancel) If IRet<>1 Then Exit Sub End Sub ........ ????
Janac Posts: 134 Rating: (11)
Suggestion To thank Quote Answer

3/2/2009 1:41 PM	Rate (0)
April Posts: 1776 Rating: (95)	Hi, so maybe underscore is not allowed in VBS in WinCC V6.0 SP3. It depends on the VBS version. Hope you can work without underscore.
April Posts: 1776 Rating: (95)
Suggestion To thank Quote Answer
This contribution was helpful to 2 thankful Users Janac robin.h..

4/22/2009 2:41 PM	Rate (0)
kric Posts: 14 Rating: (0)	VBS used in WinCC is describer in Help as VBS Reference. There is also described howto use Microsoft Script Debugger to debug Your scripts.
kric Posts: 14 Rating: (0)	Last edited by: kric at: 4/22/2009 2:41 PM
Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Follow us on