To all,

We are calling StartOI from a VB program. However, it isn't working, i.e., OI doesn't start.

We protyped RDKINSTP as:

Public Declare Function StartOI Lib "c:\Work\Single User\Oinsight\Develop\RDKINSTP.dll" (ByVal RSHwnd As Long, ByVal RSApp As String, ByVal RSLoc As String, ByVal RSUser As String, ByVal RSPassword As String) As Boolean

Below is our VB test code to start OI:

Function Update_openinsight()

Dim hInstallWindow As Long

ChDir ("c:\Work\Single User\Oinsight")

a=StartOI(hInstallWindow, "SYMMETRY", "c:\Work\Single user\Oinsight\dEVELOP", "SYMMETRY", "”)

MsgBox (a)

End Function

* end of code ***

Any comments/suggestions would be welcome,

Ray Chan

We have a VB exe (with form being the splash screen) with the following code, to launch an OI app.

Private Sub Form_Load()

  Me.Move (Screen.Width - Me.Width) / 2, (Screen.Height - Me.Height) / 2

  Me.Show

  DoEvents

  Shell "OINSIGHT /ap=icepac /un=ripac"

  End

End Sub

View this thread on the forum...