PixxUI.PIConnection

Description

Open a PI server connection

Parameters

Server As String

User As String

Password As String

Return Value

Success As Boolean

SVB Example

' References required ' PixxAddin 1.0 Type Library (1.0) ' PISDK 1.3 Type Library (1.0) ' PISDKCommon 1.0 Type Library (1.0)

Option Base 1 Const g_nItems = 2 Sub Main

Dim PiConn As PixxUI Set PiConn = AddIns.AddIn("PixxAddin.PixxUI.1")

Dim Srvr As String Dim User As String Dim Pwd As String

Srvr = "PISERVER" User = "piadmin" Pwd = ""

Dim Success As Boolean

On Error Resume Next Success = PiConn.PIConnection(Srvr,User,Pwd)

If Err.Number <> 0 Then

MsgBox Err.Description

Exit Sub

End If

End Sub