<%
Session("ManCo") = ""
if Session("firsttime") <> 0 and Session("firsttime") <> 1 then
Session("firsttime") = 0
end if
%>
<% if 0 then %>
<% end if %>
<%
fp_sQry="SELECT * FROM tblUsers WHERE (UID = '::UID::' AND PWD = '::PWD::')"
fp_sDefault="UID=&PWD="
fp_sNoRecords=""
fp_sDataConn="Database1"
fp_iMaxRecords=256
fp_iCommandType=1
fp_iPageSize=0
fp_fTableFormat=False
fp_fMenuFormat=False
fp_sMenuChoice="ManCo"
fp_sMenuValue="ManCo"
fp_sColTypes="&UID=202&PWD=202&ManCo=202&Prop=202&"
fp_iDisplayCols=2
fp_fCustomQuery=False
BOTID=0
fp_iRegion=BOTID
%>
ManCo: <%=FP_FieldVal(fp_rs,"ManCo")%>
Prop: <%=FP_FieldVal(fp_rs,"Prop")%>
<%Session("ManCo") = FP_FieldVal(fp_rs,"ManCo")%>
<%Session("Prop") = FP_FieldVal(fp_rs,"Prop")%>
<%
if Session("ManCo") <> "" then
Session("UID") = Request("UID")
Response.Redirect "client.asp"
else
if Session("firsttime") <> 0 then
response.write "Invalid username or password!"
else
Session("firsttime") = 1
end if
End if
%>
