Solid Edge Framework Type Library
ValidateLogin Method
Specifies the UserName of the user to authenticate.
Specifies the password of the user to authenticate.
Specifies the group to which the user belongs. The default group is "dba".
Specifies the Role of the User in InsightXT.
Specifies the server name to which the user wants to connect.
Description
Validates the Login
Syntax
Visual Basic
Public Sub ValidateLogin( _
   ByVal bstrUserName As String, _
   ByVal bstrPassword As String, _
   ByVal bstrGroup As String, _
   ByVal bstrUserRole As String, _
   ByVal bstrDBUrl As String _
) 
Parameters
bstrUserName
Specifies the UserName of the user to authenticate.
bstrPassword
Specifies the password of the user to authenticate.
bstrGroup
Specifies the group to which the user belongs. The default group is "dba".
bstrUserRole
Specifies the Role of the User in InsightXT.
bstrDBUrl
Specifies the server name to which the user wants to connect.
Remarks
The API actually uses to log in to the InsightXT.  The behavior of the authentication process depends on the display_alerts flag. If the display_alerts flag is ON then user will see the Auto-Login dialog (for the login purpose) where he can do AutoLogin or he can directly type in his UserName and password to authenticate him. If the user provides the wrong information then the value of the hr will return as S_FALSE.
If the value of the flag is OFF, then Validatelogin () method will use the username/password that is supplied, to login into InsightXT. But this time, no login dialog will be shown and the login will be done silently.
Example
Private Sub Command1_Click()
    On Error Resume Next
    Dim objApplication As SolidEdgeFramework.Application
    Dim objSolidEdgeInsightXT  As SolidEdgeFramework.SolidEdgeInsightXT
    
    Set objApplication = GetObject(, "SolidEdge.Application")
    Set objSolidEdgeInsightXT = objApplication.SolidEdgeInsightXT

    Dim UserName As String
    Dim Password As String
    Dim Group As String
                            
    UserName = "username"
    Password = "pasword"
    Group = "dba"
    Call objSolidEdgeInsightXT.ValidateLogin(UserName, Password, Group)

    Set objSolidEdgeInsightXT = Nothing
    Set objApplication = Nothing
End Sub
See Also

SolidEdgeInsightXT Object  | SolidEdgeInsightXT Members  | Solid Edge ST4 - What's New