User cache %CSP.Page 1 code %Status 1 code %Boolean " Write !,"",! Write " ",! Write " ",! Write " ",! Write "

" Write "" Write "Statistieken "_(site)_" website" Write "" Write "

",! Write "
",! Write !,"" Write ! If '($G(%request.Data("HPM",1))="HPM") Goto %csp00001 ;{ Write ! Do ..Include("hpm.csp") Write ! %csp00001 ;} Write !,!,"" Write ! If '($G(%request.Data("HPH",1))="HPH") Goto %csp00002 ;{ Write ! Do ..Include("hph.csp") Write ! %csp00002 ;} Write !,!,"" Write ! If '($G(%request.Data("HPP",1))="HPP") Goto %csp00003 ;{ Write ! Do ..Include("hpp.csp") Write ! %csp00003 ;} Write !,!,"" Write ! If '($G(%request.Data("HPT",1))="HPT") Goto %csp00004 ;{ Write ! Do ..Include("hpt.csp") Write ! %csp00004 ;} Write !,!,"" Write ! If '($G(%request.Data("HPL",1))="HPL") Goto %csp00005 ;{ Write ! Do ..Include("hpd.csp") Write ! %csp00005 ;} Write !,!,"" Write ! If '($G(%request.Data("SessDur",1))="SD") Goto %csp00006 ;{ Write ! Do ..Include("sessdur.csp") Write ! %csp00006 ;} Write !,!,"" Write ! If '($G(%request.Data("SDT",1))="SDT") Goto %csp00007 ;{ Write ! Do ..Include("sessmat.csp") Write ! %csp00007 ;} Write !,!,"

 

",! Write "

 

",! Write "" ]]> 1 code %Boolean " Write ! Do ..OnPageHTML() ]]> 1 code %Boolean " Write !,"",! Write "" Write !,"" Write !,"" ]]> 1 code %Boolean " Write ! Set %session.AppTimeout = 905 Write ! Do ..OnPageHEAD() Write !,! New site Set site=$Get(%request.Data("site",1)) If site="" Set site="Van Hoecke" /// Totaal berekenen /// New queryTOT /// Set queryTOT=##class(%ResultSet).%New("DW.WWW.Log:GetTOT") /// Do queryTOT.Execute(site) /// Do queryTOT.Next() Write !,! Do ..OnPageBODY() Write !,"" ]]> iso-8859-1 text/html c:\cachesys\csp\httplog\vhstat.csp /csp/httplog/vhstat.csp 59912,59554