"Otto" <leholt@worldonline.dk> wrote in message
news:QYSs7.778$Ay.109922@news010.worldonline.dk...
> Hej
> jeg har lavet en telefonliste for en skole, hvor man kan vælge for hvilke
> klasse
> man vil se telefonlisten . heritl bruger jeg en selectform. Se nedenfor.
> Spørgsmålet er nu - hvordan laver jeg en Option som viser alle klasser -
> altså her A, B,C, D, osv. Jeg har prøvet 100 forskellige måder , men ikke
> fundet ud af det . det er sikkert nemt .... , hvis man bare ved hvordan .
Nu kender jeg selfølgelig ikke opbygningen af din database, så du skal nok
lige ændre feltnavnene:
[snip]
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver(*.mdb)};DBQ=" &
Server.MapPath("database.mdb")
SQL = "SELECT * FROM klasser"
Set RS = Conn.Execute(SQL)
if not RS.eof then
response.write "
response.write "<FORM ACTION=""" &
Request.ServerVariables("Script_NAME") & """ Method=""post"">"
response.write "Vælg hvilken klasse du vil se: "
response.write "<SELECT NAME =""strKlasse"">"
Do While Not RS.eof
response.write "<OPTION VALUE=""" & RS("klassenavn") & """>" &
RS("klassenavn") & "</OPTION>"
RS.MoveNext
Loop
response.write "</SELECT> <INPUT TYPE=""SUBMIT"" VALUE="" Søg "">"
response.write "</FORM>"
end if
set RS = Nothing
Conn.Close
set Conn = Nothing
Håber det virker for dig!?
Hygge,
Tony
--
Tony Lorentzen
Freelance webudvikler
tony@lorentzen.com
> <form action="<%=Request.ServerVariables("Script_NAME")%>" Method="post">
> <b>Vælg hvilken klasse du vil se:
> <SELECT NAME ="strKlasse">
> <Option SELECTED>KLASSE</option>
> <Option Value="A">A </option>
> <Option Value="B">B </option>
> <Option Value="C">C </option>
> <Option Value="D">D </option>
> <Option Value="E">E </option>
> <Option Value="F">F </option>
> <Option Value="J">J </option>
> <Option Value="K">K </option>
> <Option Value="P">P </option>
> <Option Value="Q">Q </option>
> <Option Value="R">R </option>
> <Option Value="T">T </option>
> <Option Value="U">U </option>
> <Option Value="V">V </option>
> <Option Value="X">X </option>
> <Option Value="Y">Y </option>
> </select>
> og klik </b>
> <INPUT TYPE ="submit" Value="Vis telefonliste"></input>
> </form>
>
>
>
> --
> _____________________________________________
> Otto Leholt - Baggesensgade 19 - Copenhagen 2200 N
> phone: 3537 4928
http://www3.ewebcity.com/otto/
> _____________________________________________
>
>
>
>