Webmasters, gagnez de l'argent en affichant des bannières contextuelles Oxado
SourceForge.net Logo
Support This Project Free Downloads
WABAccess Project
Welcome ! [ Home ]  ·  [ Downloads ]  ·  [ Forums ]  ·  [ News ]  ·  [ Documentations ]  
[ Home ]

[ Documentations ]

Open a WAB Session


The first action to do is to open a WAB Session. No other method or property of the Session object can be accessed until the application has successfully logged on. The only exception to this rule is the Session objects Name, Version and Description, Identities properties.

You must create a WABAccess component using the CreateObject function with the ProgID "WABAccess.Session". When the Session object is created you must call the Open method.

If Outlook Express is installed with Identity, when you open the WAB you can EnableProfiles, in this case the user will work inside an identity. The identity is the same as the identity he has select with Outlook Express. If the user has close the previous Outlook Express session the Identity Manager is launch and the user can select an identity. If the user don't choose an identity no error is raise and the LastIdentity must be verify. A value of {00000000-0000-0000-0000-000000000000} after the call to open method for the LastIdentity property indicates that no identity has be selected. For more information on Identity read the articles :

Dim objSession

OpenWab

CloseWab

' Open the WAB and check if an identity is selected
Sub OpenWab
    Set objSession = CreateObject("WABAccess.Session")

    ' Open the WAB
    objSession.Open True
    ' Check the last identity
    If objSession.Identities.LastIdentity = "{00000000-0000-0000-0000-000000000000}" Then
        MsgBox "No Identity Selected"
    Else
        MsgBox "The Identity " & _
        objSession.Identities(objSession.Identities.LastIdentity).Name & " is selected"
    End If
End Sub

Sub CloseWab
    ' Close the WAB
    objSession.Close
End Sub

WABAccess