% Dim yProduct yProduct = Request.QueryString("y") Select Case yProduct Case "1" RestOfPage Product1Stuff BottomOfPage Case "2" RestOfPage Product2Stuff BottomOfPage Case "3" RestOfPage Product3Stuff BottomOfPage Case "4" RestOfPage Product4Stuff BottomOfPage Case "5" RestOfPage Product5Stuff BottomOfPage Case "6" RestOfPage Product6Stuff BottomOfPage Case "7" RestOfPage Product7Stuff BottomOfPage Case "8" RestOfPage Product8Stuff BottomOfPage Case "9" RestOfPage Product9Stuff BottomOfPage Case "andweb" RestOfPage SelectStuff BottomOfPage Case Else GetOuttaHere End Select %> <% Sub RestOfPage %>
Products
Credit & Collections
Inventory & Warehousing
Production Control
Supply Chain
Order Processing
& Invoicing
Accounting
Construction Accounting
Group Management
Development Tools