4 svar · 250 visningar · startad av phazer23
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,
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"