%
Set conn = Server.CreateObject("ADODB.Connection")
conn.CommandTimeOut=0
conn.open "DSN=eGO","ego","jabiru7"%>
Discount Travel Deals, Secret Sales, and the Latest Travel News
<% =Date %>
<%' category_key = request("category_key")
if category_key = 1 then response.write "Package Specials"
if category_key = 2 then response.write "Travel News"
if category_key = 3 then response.write "Travel Features"
if category_key = 4 then response.write "Cruise Specials"
if category_key = 5 then response.write "Hotel Specials"
if category_key = 6 then response.write "Airline Specials"
if category_key = 7 then response.write "Resort Specials"
%>