NEXT SESSION WILL BE STARTED FROM 23 MAY 2013
Wednesday, May 22, 2013
Invest in People the Only Asset that Appreciates ...
orksheets/sheet5.xmlPK- ! % S ) xl/theme/theme1.xmlPK- ! jC U 0 xl/sharedStrings.xmlPK- ! '>e4 Q!
]3 xl/styles.xmlPK- ! M ' 8 xl/printerSettings/printerSettings3.binPK- ! m5 ' ? xl/printerSettings/printerSettings2.binPK- ! *=5- aD xl/calcChain.xmlPK- ! '8HV ' F xl/printerSettings/printerSettings1.binPK- ! N d WG docProps/core.xmlPK- ! 6ز I docProps/app.xmlPK L desc")
Response.Write(desc & "
")
rs.close
response.Write("
")
'Collection of Different Categories in Arrays
strsql = "Select distinct Category from CoursesDataTbl"
rs.open strsql,cn
a=1
dim mycategory(14)
while not rs.eof
Category = rs("category")
mycategory(a) = category
a=a+1
rs.movenext
wend
rs.close
intb = 1
for intb = 1 to 14
' Getting the Courses Now One By One
' Getting Category 1
Strsql2 = "Select * from CoursesDataTbl where Category='"&mycategory(intb)&"' AND Status_Course ='DRO' "
rs.open strsql2, cn
Response.Write("
" & UCase(myCategory(intb)) & "
")
while not rs.eof
prgnm = rs("prgnm")
agenda = rs("agenda")
duration = rs("duration")
Category = rs("category")
CategoryLink = rs("CategoryLink")
Response.Write("
" & "" & ucase(prgnm) & " TRAINING
(Click Here For Detials)" & "")
Response.Write("
" & "
DESCRIPTION:")
Response.Write("
" & agenda & "
")
Response.Write("
DURATION: " & Duration & "")
response.write("____________________________________________________________________________________________________________________________________")
Response.Write("
")
rs.movenext
Response.Write("
")
wend
rs.close
next
'DIV FOR BOTTOM
response.Write("