<%--
   asp code Generated by Basic Processor
   Original Page Name: C:\gmTestBed\FMStocks\src\FMSWeb\ASP\_GetXMLPortfolio.asp
--%>

<%@ Page language="VB" explicit="true" CodeBehind="_GetXMLPortfolio.aspx.vb" Inherits="FMSWeb.__GetXMLPortfolio" %>

<%
   HttpContext.Current.Response.Buffer = True
%>
<%
   email = HttpContext.Current.Request("email")
   password = HttpContext.Current.Request("password")
   bIsValid = objAccount.VerifyLogin(email,password,FullName,AccountID)
   If (bIsValid) Then
      rs = objAccount.ListPositions(AccountID)
      WriteXML_Recordset(rs)
   End If
%>
