Dropdown meny problem.....

Jag har en liten fråga angående dropdownmenyer...
Jag använder koden nedan för att dra fram dropdownmenydetalker från databasen men vill endast att en av varje kommun skall visas.. Nån som har en ide om hur man kan göra?????

<% 
Set Connect1 = Server.CreateObject("ADODB.Connection")
Connect1.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\vastrag\data001\foretagdb.mdb")
 SQL = "SELECT * FROM data1 ORDER BY kommun" 
Set Rs = Connect1.Execute(SQL) 
Response.Write "<SELECT NAME='kommun'>"
Do Until Rs.Eof
Response.Write "<OPTION VALUE='" & _
Rs("kommun") & "'>" & Rs("kommun") & _
"</OPTION>"

Rs.MoveNext
Loop

Response.Write "</SELECT>"
       
Set Rs1 =Nothing
Set Connect1= Nothing
%>

det ser ut som om du bara använder fältet kommun i din kod, så då känns det onödigt att hämta något annat än just det fältet. då hade jag gjort så här:

SQL = "SELECT DISTINCT kommun FROM data1 ORDER BY kommun"

det är alltså distinct som bestämmer att varje kommun endast får finnas med en gång.

mvh,

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
all your base are belong to us!</A>

OK. Tack det funkade.. Jag måste vara helt slut i hjärnan i kväll.... Har varit uppe sen 04.00 kanske skall gå och lägga mig.....

Ett tips tillge For slingan en variabel istället och skriv ut allt på en gång, det går mycket fortare för sidan att laddas då.
ex.
For i = 1 To 10
sText = sText + "Text"
Next
Response.Write sText & "Annan tex"

------------------
"Brott kanske inte lönar sig, men det är kul"

Nickemannen:
Det går INTE fortare att lägga allt i samma sträng under loopning än att använda sig av Response.Write i varje loop.

Kolla in denna artikel på ASP101.

cya,
PatrikB

------------------
Ingenting är omöjligt.
Det omöjliga tar bara något längre tid att genomföra.