Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

98 lines
2.1 KiB

<%
function GetDBConnection ( szConnectionString )
{
try
{
g_DBConn = new ActiveXObject( "ADODB.Connection" );
g_DBConn.CommandTimeout=600;
g_DBConn.ConnectionTimeout = 600;
try
{
g_DBConn.Open( szConnectionString );
}
catch( err )
{
return false;
}
}
catch ( err )
{
return false;
}
return g_DBConn;
}
function fnMakeDBText ( szString )
{
pattern = /'/g;
szString = new String( szString );
if ( String( szString ) != "undefined" )
{
szString = szString.replace( pattern, "''" );
}
return szString;
}
function fnGetCustomerID( PPID )
{
try
{
//Response.Write("PPID: " + PPID + "<BR>" )
if ( PPID == "0" || PPID == "1" )
{
//Response.Write( "PPID no good<BR>" )
if ( !g_objPassportManager )
fnGetPassportObject();
var ppMemberHighID = new String( g_objPassportManager.Profile("MemberIDHigh" ));
var ppMemberLowID = new String ( g_objPassportManager.Profile("MemberIDLow" ) );
var PPID = "0x" + fnHex( ppMemberHighID ) + fnHex( ppMemberLowID );
var ppCustomerEmail = new String( g_objPassportManager.Profile( "PreferredEmail" ));
//Response.Write(" PPMemberID: " + PPID + " <BR>" )
}
var cnCustomerDB = GetDBConnection( Application("L_OCA3_CUSTOMERDB_RO" ), true );
var Query = "OCAV3_GetCustomerID " + Number(PPID) + ",'" + ppCustomerEmail + "'" ;
//Response.Write(" <BR><BR>Query: " + Query + "<BR>" )
var rsCustomerID = cnCustomerDB.Execute( Query );
if ( !rsCustomerID.EOF )
{
//Response.Write("Assigning customer ID: " + rsCustomerID("CustomerID" ) )
var CustomerID = new Number( rsCustomerID("CustomerID" ) )
}
else
{
//Response.Write("RSCustomerId.EOF is true<BR>" )
CustomerID = new Number( 0 );
}
//Removed this cuz we don't want to store the customer ID
//fnWriteCookie( "CID", CustomerID );
cnCustomerDB.Close();
return ( CustomerID )
}
catch( err )
{
;//will fall through to the end
}
return ( 0 )
}
%>