 |
||
|
<%
Dim QCount, i
Dim aFArea(5), aPosApp(8), aMonth(12)
Dim sSetPos
aFArea(0) = "-----Select-----"
aFArea(1) = "Operations"
aFArea(2) = "Quality"
aFArea(3) = "Training"
aFArea(4) = "Administration"
aPosApp(0) = "-----Select-----"
aPosApp(1) = "Trainer-Sales/Soft-skills"
aPosApp(2) = "Manager-Quality "
aPosApp(3) = "Manager-Operations "
aPosApp(4) = "Customer Service Professional"
aPosApp(5) = "Tele-marketing Executive"
aPosApp(6) = "No Current Vacancies"
aPosApp(7) = "Assistant Manager-Administration"
aMonth(0) = "Jan"
aMonth(1) = "Feb"
aMonth(2) = "Mar"
aMonth(3) = "Apr"
aMonth(4) = "May"
aMonth(5) = "Jun"
aMonth(6) = "Jul"
aMonth(7) = "Aug"
aMonth(8) = "Sep"
aMonth(9) = "Oct"
aMonth(10) = "Nov"
aMonth(11) = "Dec"
Session("AppID") = Session.SessionID
if Request.QueryString("QCount") = "" or Isnull(Request.QueryString("QCount")) then
QCount = 1
else
QCount = Request.QueryString("QCount")
end if
if Request.QueryString("sPos") = "" or Isnull(Request.QueryString("sPos")) then
sSetPos = ""
else
sSetPos = Request.QueryString("sPos")
end if
%>
|
