Code to Set a New MSCSProfile Ticket
This example shows the creation of a globally unique identifier (GUID), used to identify a user, and the creation of an MSCSProfile ticket, which places the GUID on a persistent cookie for the user.
Create the GenID object.
Dim oGenID Set oGenID = Server.CreateObject("Commerce.GenID")
Create the GUID string.
Dim sGUID sGUID = oGenID.GenGUIDString()
Using the AuthManager object, oAuthManager, created and initialized in Code to Create and Initialize AuthManager, create the MSCSProfile ticket.
oAuthManager.SetProfileTicket sGUID, True
Release the objects.
Set oGenID = Nothing Set oAuthManager = Nothing
Copyright © 2005 Microsoft Corporation.
All rights reserved.