WebRessurs.no - Webprogrammering og ressurs innen ASP, ASP.NET, PHP, SQL, HTML, CSS, Javascript, XML, C#, VB, Flash mm.

KODE EKSEMPLER

ASP.net (199)

ASP 3.0 (111)

PHP (30)

HTML (66)

SQL (89)

CSS (46)

XML (7)

JavaScript (78)

Diverse kode (13)

ARTIKLER / RESSURSER

Programmering (22)

System og drift (15)

Trafikk og inntekt (11)

Guider og tips (22)

Nyttig lesestoff (23)

Web forum (604)

Link galleri (565)

KURS / TUTORIALS

ASP.NET kurs(5)

CSS kurs (2)

JQuery kurs (2)

FILM / MEDIA

Øk trafikken (8)

Facebook App. (4)

Microsoft CEO (6)

GRATIS SOFTWARE

Server & web

Internett & epost

Systemverktøy

Sikkerhet

Fildeling

Lyd & media

Diverse software

TJENESTER

Domenesalg

Metagenerator

Websikre farger

WebMail

ANNET

Bli medlem!

Siste innlegg

Gjestebok

Tips en venn

Kontakt oss

Forsiden

INTERNETT HASTIGHET

Vise aktivt valg i en dropdown-meny

av Øyvind A. Isaksen

Hvis du har en loop der du henter ut info fra en database og presenterer denne i en dropdown-meny, vil menyen vise det øverste valget automatisk etter at du klikker på f.eks valg 2 eller 3.
Det naturlige ville være at når du velger f.eks valg 2 i menyen, så er dette valget "selected" etter at du har trykket på det.

For å få til dette er det kun å lage en if-setning som sjekker NÅR informasjoenen (her:kategorien) som er lagret i databasen, er lik informasjonen som er valgt i dropdownen. Dvs, i loopen må den kategorien som er valgt (her: varekatid) vare lik verdien i databasen (her: optverdi). I det tilfellet skal vi sette "selected" i option-taggen, og dette vil da vises som "aktivt" i rullegardinen.

<%
varekatid = Request.QueryString("varekategoriid")
if varekatid <> "" then varekatid = int(varekatid)

Sub viskategorier()
SQL="select varekategorinavn, varekategoriid from tblVarekategorier order by varekategorinavn"
set rsHent = server.CreateObject("adodb.recordset")
rsHent.Open sql,connstring

Do while not rsHent.EOF
optNavn = rsHent.Fields("varekategorinavn")
optVerdi = rsHent.Fields("varekategoriid")

if varekatid = optVerdi then
temp = temp & "<option selected value="""&optVerdi&""">" & optNavn & "</option>"
else
temp = temp & "<option value="""&optVerdi&""">" & optNavn & "</option>"
end if

rsHent.MoveNext
loop

rsHent.Close
set rsHent = nothing
Response.Write(temp)
end sub
%>

WebRessurs.no er utviklet og drives av SoftMaker
Sett som startside: [ ]. Bokmerk denne siden: [ klikk ]. Sitemap. http://twitter.com/webressurs_no/. Antall brukersesjoner: 14105788.
Copyright WebRessurs.no © 2003 - 2018