form: drop down

<%includ......%>
her vil jeg så gerne have en form, dropdown menu, og hver gang man ændre i den, så skal den løbe den næste asp kode igennem
<%henter oplysningere fra en database, det skal så variere efter hvad man har valgt i dropdownmenuen..... %>


<% server.execute "include.asp" %>

HER FORM SKAL VÆRE
<%
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/Dbase/basen.mdb")
' Åben databaseforbindelsen
Conn.Open DSN

HER SKAL SÅ NOGET IF IND, if form = analyse Then

Response.write "<table border=""1"" width=""700""><tr id=""1""><td width=""15%"">Parameter</td><td width=""15%"">Seneste resultat</td><td width=""15%"">Laveste resultat</td><td width=""15%"">Højeste resultat</td><td width=""15%"">Enhed</td><td width=""15%"">Kvalitetskrav</td><td width=""15%"">Sted</td></tr>"

' SQL forespørgsel
strSQL = "Select * from Analyse"
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)


' Gennemløb Recordset (rs) med en løkke
Do
 
  ' Udskriv værdien af kolonnen Parameter
  Response.Write "<tr><td id=""2"">" & rs("Parameter") & "</td><td>" & rs("SenRes") & "</td><td>" & rs("LavRes") & "</td><td>" & rs("HøjRes") & "</td><td>" & rs("Enhed") & "</td><td>" & rs("Kkrav") & "</td><td>" & rs("Sted") & "</td></tr>"

  rs.MoveNext

' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF

END IF

og så kopire det hele igen, hvor den laver en tabel over noget andet hvis form er = med personer, eller sådan noget


' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing

%>

</body>
</html>