webForumDet fria alternativet

Förmarkerat val i dropdown-lista

ASP

2 svar · 270 visningar · startad av laidback

Medlem sedan maj 2001797 inlägg
Frågan#1

Vill redigera information ur en tabell, och hämtar bland annat ett fält (ur en accessdatabas) som heter theHead. Det fältet berättar vilken URL rubrikbilden man har valt har. Jag vill skriva ut en rullgardinslist med alla tillgängliga rubrikbilder, men vill att den man valt tidigare (vars url alltså finns i databasen) ska vara "förvald" eller hur man ska säga. Förslag?

Koden för själva rullgardinen ser ut så här just nu - förslag på modifiering?

<%

sql2 ="SELECT bildNamn, bildURL FROM thePics WHERE bildType='rubrikbild' ORDER BY bildNamn ASC"
set rs = Databas.execute(sql2)
if rs.eof then
response.write "<p>Inga bilder finns</p>"

else

arrBilder = rs.getrows()

rs.close()
set rs = nothing

response.write "<select name=""rubrikbilder"" size=""1"">"

For I = 0 To UBound(arrBilder,2)

strBilder = arrBilder(0,I)
intBilderURL = arrBilder(1,I)

response.write "<option value="""& intBilderURL  &""">"& strBilder &"</option>"

Next
response.write "</select>"
End If
%>
Medlem sedan okt. 2004392 inlägg
#2

Har du URL:en som är vald i en variabel någonstans? Alltså har du satt värdet för den valda URL:en? I så fall kan du göra så:

For I = 0 To UBound(arrBilder,2)
  strBilder = arrBilder(0,I)
  intBilderURL = arrBilder(1,I)

  If selectedURL = intBilderURL Then
    Response.Write "<option value=""" & intBilderURL  & """ selected>" & strBilder & "</option>"
  Else
    Response.Write "<option value=""" & intBilderURL  & """>" & strBilder & "</option>"
  End If

Next
Medlem sedan maj 2001797 inlägg
#3

Yes, det ser ut att fungera klockrent! Tack så mycket :)

285 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
140 ms — deklarationer (db)
0 ms — hämta statistik (cache)
142 ms — hämta tråd, inlägg och bilagor (db)
131 ms — ändringar (db)