Sorting Dropdown list

Hi All,
I know there are topics about what Im goint to ask, but I really dont
understand nything off it.

All the data is in a table.
The names of the colums are:
WPaperNaam | WPaperCat | WPaperRoot

when you add a new row in the table you have to fill in also a catergorie.
What I want is a dropdown list what wil show the categories.

When I use the Dynamic List then it will show all the content from the colum
WPaperCat .
If there are 3 rows with the WPaperCat like Celebs and 5 rows with Cars I
want the list to show only once Celebs and only once Cars.
Could someone help me out?

This is the code DW has made:
<select name="select">
<%
While (NOT rsMenu.EOF)
%>
<option value="<%=(rsMenu.Fields.Item("WPaperCat").Value)% >" <%If (Not
isNull((rsMenu.Fields.Item("WPaperCat").Value))) Then If
(CStr(rsMenu.Fields.Item("WPaperID").Value) =
CStr((rsMenu.Fields.Item("WPaperCat").Value))) Then
Response.Write("selected=""selected""") : Response.Write("")%>

%=(rsMenu.Fields.Item("WPaperCat").Value)%></option
%

rsMenu.MoveNext()
Wend
If (rsMenu.CursorType > 0) Then
rsMenu.MoveFirst
Else
rsMenu.Requery
End If
%>
</select>