Initial Definitions
The legacy CyberStore Connect examples use ASP.NET, VB, and XML DOM objects to send a session-profile request and process its XML response.
Namespaces and page definition
The examples import System, HttpContext.Current, and System.Xml. The ASP.NET page directive uses aspcompat="true".
<%@ Import Namespace="System" %>
<%@ Import Namespace="HttpContext.Current" %>
<%@ Import Namespace="System.Xml" %>
<%@ Page Language="VB" aspcompat="true" Debug="true" %>
Example variables
The following example names the endpoint, client code, login and logout routes, session state, and XML objects used by the legacy integration pattern.
Dim WEBSERVICEROOT As String = "https://" & Request.ServerVariables("SERVER_NAME") & "/Ecommerce/Connect/Session.asmx"
Dim WEBSERVICEURL As String = "https://" & Request.ServerVariables("SERVER_NAME") & "/Ecommerce/Connect/Session.asmx/GetProfile"
Dim CLIENTCODE As String = "[CLIENT_CODE]"
Dim YOUAREHERE As String = "[CURRENT_URL]"
Dim LOGINURL As String = "[LOGIN_URL]"
Dim LOGOUTURL As String = "[LOGOUT_URL]"
Dim YOUHAVEACCESS As Boolean = False
Dim SoapRequest = Server.CreateObject("MSXML2.XMLHTTP")
Dim WEBSERVICERESPONSE = Server.CreateObject("MSXML2.DOMDocument.3.0")
CLIENTCODE represents the unique client code created during CyberStore Connect client registration.