<% if (InStr(Request.ServerVariables("URL"),"Login.asp") = 0) and (InStr(Request.ServerVariables("URL"),"CheckPasswordFail.asp") = 0) then Session("Redirect") = Request.ServerVariables("URL") & "?" & Request.QueryString end if qLoginName = Request.Cookies("LoginName") if qLoginName = "" then qLoginName = "Guest" if Session("ClientType") = "Free" then%> <%=qLoginName%> is
logged off

<% else %> <%=qLoginName%> is
logged on

<% end if%>

Industry News

<%NowDate = Date if (Application("NewsDate") = "01/01/2000") or (NowDate <> Application("NewsDate")) and (Hour(Now) > 11) then Set rsNewsFlash = Application("objDBInformation").Execute("SELECT TOP 3 ID, Title FROM News ORDER BY Date DESC;") Set objNewsFlashID = rsNewsFlash("ID") Set objNewsFlashTitle = rsNewsFlash("Title") 'Randomize 'Application("NewsFlash1ID") = Int(Rnd * 10) 'Application("NewsFlash2ID") = Int(Rnd * 10) 'do Until Application("NewsFlash2ID") <> Application("NewsFlash1ID") ' Application("NewsFlash2ID") = Int(Rnd * 10) 'loop 'Application("NewsFlash3ID") = Int(Rnd * 10) 'do Until (Application("NewsFlash3ID") <> Application("NewsFlash1ID")) and (Application("NewsFlash3ID") <> Application("NewsFlash2ID")) ' Application("NewsFlash3ID") = Int(Rnd * 10) 'loop 'rsNewsFlash.Move Application("NewsFlash1ID") 'Application("NewsFlash1ID") = objNewsFlashID 'Application("NewsFlash1Title") = objNewsFlashTitle 'rsNewsFlash.MoveFirst 'rsNewsFlash.Move Application("NewsFlash2ID") 'Application("NewsFlash2ID") = objNewsFlashID 'Application("NewsFlash2Title") = objNewsFlashTitle 'rsNewsFlash.MoveFirst 'rsNewsFlash.Move Application("NewsFlash3ID") 'Application("NewsFlash3ID") = objNewsFlashID 'Application("NewsFlash3Title") = objNewsFlashTitle rsNewsFlash.MoveFirst Application("NewsFlash1ID") = objNewsFlashID Application("NewsFlash1Title") = objNewsFlashTitle rsNewsFlash.MoveNext Application("NewsFlash2ID") = objNewsFlashID Application("NewsFlash2Title") = objNewsFlashTitle rsNewsFlash.MoveNext Application("NewsFlash3ID") = objNewsFlashID Application("NewsFlash3Title") = objNewsFlashTitle Application("NewsDate") = NowDate end if %>

&NewsTitle=<%=Replace(Application("NewsFlash1Title")," ","%20")%>"><%=Application("NewsFlash1Title")%>

&NewsTitle=<%=Replace(Application("NewsFlash2Title")," ","%20")%>"><%=Application("NewsFlash2Title")%>

&NewsTitle=<%=Replace(Application("NewsFlash3Title")," ","%20")%>"><%=Application("NewsFlash3Title")%>


By Keyword:

Or by Topic:

Perfume Depot

See our new book review section!

Subscribe to a monthly newsletter customized for your needs!

Check out the most comprehensive Perfume Industry database!

Find out about specific Promotional Campaigns

<% CountItemByPage = 20 CountItem = objCountItems CountPage = CountItem \ CountItemByPage if not (CountItem mod CountItemByPage = 0) then CountPage = CountPage + 1 end if PageNumber = Request.QueryString("pn") if PageNumber = "" then PageNumber = Request.Form("PageNumber") end if if PageNumber = "" then PageNumber = 1 else PageNumber = PageNumber + 1 end if %> <% MetaCategories = Request.Form("MetaCategories") const mcBrand = 1 const mcPackaging = 2 const mcRetailers = 3 const mcFragrance = 4 const mcServices = 5 const mcPress = 6 const mcMiscellaneous = 7 if MetaCategories = "" Then MetaCategories = mcBrand end if %>

<% Select Case MetaCategories Case 1 %>
<% Case 2 %>
<% Case 3 %>
<% Case 4 %>
<% Case 5 %>
<% Case 6 %>
<% Case 7 %>
<% End Select %>

Sub-Category :

Keyword : search by

Complete Company List | Complete Sub-Categories List <% if Session("ClientType") <> "Free" then %>| Add Contact | My Contacts<% else %>| Add Contact | My Contacts<% end if %>


Welcome to Industry Contacts!

This is the most powerful online database in the perfume industry. Containing over 42,000 entries, you will be able to find anyone in the industry. Say you are a retailer looking for a supplier; a perfume company looking for a retailer or supplier; you are a member of the media and are looking for an account executive or marketing manager, Industry Contacts is the place to find it all!

How to use this database

Because there are so many different facets to the Fragrance Industry, we designed this interface to be both complete and intuitive. At any time, you can select Complete Company List for a list of all the companies in the fragrance industry listed alphabetically. You can also select Complete Sub-Categories List for a complete list of every sub-category.

The following describes how to access the information for a more specific search:

For a simple Sub-Category search:

  1. Select one of the main categories above (i.e., Brands, Services, etc.). As you select a different category, the Sub-Categories will change.
  2. Next, select a Sub-Category and click the "Search" button.

For a simple Keyword search:

  1. Select one of the main categories above (i.e., Brands, Services, etc.). As you select a different category
  2. Next, type a keyword into the Keyword field.
  3. Select search either "-by Company Name-" (to display a list of contacts with the search string contained in the company name) or "-by Contact Information-" (to display a list of contacts with the search string contained in the contact information) and push the "Search" button.

For a more advanced search:

A combination of Sub-Category and keywords can be used to refine the search based on the level of information you know about the person or company you are trying to contact.


site map
about us
contact us
industry flash

alexander's list
| industry contacts | event calendar | new products
technology | chat | magazine | partners

Copyright 2000 Perfume2000 Corp. All Rights Reserved.
All other trademarks and copyrights are the property of their respective holders.