<% If IO.File.Exists(server.mappath("/includes/ksstop.aspx")) Then server.execute("/includes/ksstop.aspx") elseif IO.File.Exists(replace(server.mappath("/includes/ksstop.aspx"),"\CMS\","\test\")) Then server.execute("/includestst/ksstop.aspx") End if %> <% Dim getSect as String Dim thissect as String getSect = lcase(Request.ServerVariables("PATH_INFO")) select case true case instr(getSect,"software") > 0 thissect = "1" case instr(getSect,"analytics") > 0 thissect = "2" case instr(getSect,"consulting") > 0 thissect = "3" case instr(getSect,"pricemanagement") > 0 thissect = "4" case instr(getSect,"ourtechnology") > 0 thissect = "5" case instr(getSect,"aboutus") > 0 thissect = "6" case else thissect = "0" end select %>
SoftwareAnalyticsConsultingPrice ManagementOur TechnologyAbout Us
<% dim ActiveURL as string = Request.ServerVariables("URL") Dim reSpl = split(ActiveURL,"/") dim getTotalDir as string getTotalDir = "/" + reSpl(0) + "/" + reSpl(1) + "/" dim stFilePath as string = server.mappath(getTotalDir + "leftmenu.aspx") If IO.File.Exists(stFilePath) Then server.execute(getTotalDir + "leftmenu.aspx") End if %>

Thank you

Thank you for taking the time to fill out the white paper request form.

We will supply the requested white papers to you shortly.

Content on this page requires a newer version of Adobe Flash Player.

Get Adobe Flash player
<% If thissect = "1" then %>
<% end if%>
<% If IO.File.Exists(server.mappath("/includes/kssbase.aspx")) Then server.execute("/includes/kssbase.aspx") elseif IO.File.Exists(replace(server.mappath("/includes/kssbase.aspx"),"\CMS\","\test\")) Then server.execute("/includestst/kssbase.aspx") End if %>