%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<%
var login=Session("userLogin");
if (login==null)
{
Session("url")="listing.asp";
Response.Redirect("login.asp");
}
var i=0;
var objFSO=Server.CreateObject("Scripting.FileSystemObject");
var objTStream=objFSO.OpenTextFile(Server.MapPath("xmpds.txt"));
while (!objTStream.AtEndOfStream && i==0)
{
var lineNumber=objTStream.Line;
var strLine=objTStream.ReadLine();
splitLine=strLine.split(" ");
if (login==splitLine[0] ) // && pwd==splitLine[1]
i=lineNumber; // found
}
if(i!=0)
{
switch (i)
{
case 1: secureFolder="CanadaAccess";
break;
case 2: secureFolder="CanadaParking";
break;
case 3: secureFolder="USAccess";
break;
case 4: secureFolder="USParking";
break;
}
}
%>
<% ListFolderContents(Server.MapPath(secureFolder)); %>
<% if (secureFolder=="CanadaAccess" || secureFolder=="USAccess") { %>
- Technical
Information and Software<%}%>