DISCLAIMER
This is a small example to show how a database object can be created from a mimic script in ClearSCADA. The script below creates a instance of a template and names the newly created instance based on the user's input.
Theis sample program is intended to demonstrate one or more programming functions or methods and is presented as programming example only. Schneider Electric assumes no liability for the use or application of this example program or any portion thereof.
This is a small example to show how a database object can be created from a mimic script in ClearSCADA. The script below creates a instance of a template and names the newly created instance based on the user's input.
Sub CreateInstance
sInstanceName = InputBox("Enter instance name")
If Len(sInstanceName) > 0 Then
'Specify ClearSCADA Server object.
Set oServer = CreateObject ("Serck.ScxV6Server")
' Provide connection information to connect to the ClearSCADA Database. The SystemName should be the same as in the Configure Connections utility.
oServer.Connect "SystemName", "UserName", "UserPassword"
' Get references to the Group to create the instance in.
Set oGroup = oServer.FindObject (Server.ThisObject.Parent.FullName)
' Create the instance by passing the class information.
Set oNewUser = oGroup.Create("CTemplateInstance")
' Name the instance.
oNewUser.Rename(sInstanceName)
Server.SetOPCValue oNewUser.FullName + ".TemplateId", 9
oServer.Disconnect()
End If
End Sub
Udgivet til: Schneider Electric Danmark
Brug for hjælp?
Produktvælger
Find hurtigt og nemt de rette produkter og det rette tilbehør til dine anvendelser.
Få et tilbud
Start din salgsforespørgsel online, så vil du blive kontaktet af en ekspert.
Find forhandler
Find den nærmeste Schneider Electric-distributør.
Hjælpecenter
Find supportressourcer til alle dine behov på ét sted.