<% Dim Category,metaTitle,metaDescription,metaKeyords Category = request.cookies("Category") metaTitle = request.cookies("metaTitle") metaDescription = request.cookies("metaDescription") metaKeywords = request.cookies("metaKeywords") %> Homeland Security Directory, Tech Products

<% objRS.Open "SELECT * FROM tblCategory ORDER BY Category",objDC Do While Not objRS.EOF Cat = objRS("Category") response.write("" & Cat & "
") response.write("
") objRS.MoveNext Loop objRS.Close %>
<% Dim CompShort CompShort = request.cookies("CompShort") If len(CompShort) > 2 then response.redirect("/getlisted/select.asp") End If %>

 

Get Listed

To get started, please enter your company name.
Company Name

HOME | ABOUT US | CONTACT | ADVERTISE | GET LISTED | CALENDAR | GET UPDATES | USER AGREEMENT | PRIVACY POLICY | CREDITS

Copyright © 2010 Homeland Security Resources. All Rights Reserved.