<% 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 %>

CEO Corner

Happy New Year and a resolution for a quick economic recovery in 2009

Despite the economic crisis the world experienced in the closing months of 2008, 2009 begins as every New Year should with renewed optimism and hope.

Where can we look for optimism and hope?

We at KSS begin 2009 hopeful and optimistic:

Finally I want to thank the great staff of KSS for their tremendous efforts in 2008. We have great Fuel Pricing Solutions, but it is our professional, experienced and customer-oriented staff that creates value for our clients.

If you are currently a KSS customer, thank you and we will do even more for you in 2009. If you are not yet a customer, we will increase our efforts to demonstrate the value of our solutions and people to earn your business.

Bring on 2009 – we are ready for a recovery.

 

 

 

 

 

12 January, 2009

 

 

 

 

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 %>