18. december 2003 - 10:05Der er
2 kommentarer og 1 løsning
Qucik-selection i en dropdown
Jeg har en dropdown, hvor indholdet hentes dynamisk i en database. Indeholdet er en helvedes masse navne. Jeg vlle gerne kunne gøre sådan, at hvis jeg tastede de første bogstaver af et navn, så skulle den hoppe ned til de navne der starter med bogstaverne. Hvordan ser koden ud til denne funktion ?
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <title>Dynamisk select-boks</title> <script type="text/javascript"> valg = new Array("Albatros", "Anders", "And", "Asger", "Bi", "Blomst", "Benjamin", "Bølle", "Citron", "Cykel", "Flæskestej");
valg.sort();
function opdater(felt) { selOpts = felt.form.sel.options; selOpts.length = 0; for (i = 0; i < valg.length; i++) if (felt.value == "" || valg[i].toLowerCase().indexOf(felt.value.toLowerCase()) == 0) selOpts[selOpts.length] = new Option(valg[i], valg[i]); } </script> </head> <body onLoad="document.frm.sFelt.focus();"> <h2>Dynamisk select-boks</h2> <form name="frm"> <input type="text" name="sFelt" onKeyUp="opdater(this);" style="width: 150px;"><br /> <select multiple="multiple" size="8" name="sel" style="width: 150px;"> <script type="text/javascript"> for (i = 0; i < valg.length; i++) document.write('<option value="' + valg[i] + '">' + valg[i] + '</option>'); </script> </select><br /><br /> <input type="submit" value="Send"> </form> Indtast forbogstavet på et af ordene i select-boksen. Hvis der er flere muligheder tilbage, så prøv at indtaste det næste bogstav, osv. Du kan selvfølgelig også bare vælge en af mulighederne. Et godt script til at vise meget information.<br /><br /> <form> <input type="button" value="Markér alt" onClick="this.form.ta.select(); this.form.ta.focus();"> <input type="button" value="Kopiér" onClick="if (document.all) document.all.ta.createTextRange().execCommand('Copy'); else alert('Virker kun i Internet Explorer!');"><br /> <textarea style="width: 100%; height: 200px;" name="ta" id="ta"> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <title>Dynamisk select-boks</title> <script type="text/javascript"> valg = new Array("Albatros", "Anders", "And", "Asger", "Bi", "Blomst", "Benjamin", "Bølle", "Citron", "Cykel", "Flæskestej");
valg.sort();
function opdater(felt) { selOpts = felt.form.sel.options; selOpts.length = 0; for (i = 0; i < valg.length; i++) if (felt.value == "" || valg[i].toLowerCase().indexOf(felt.value.toLowerCase()) == 0) selOpts[selOpts.length] = new Option(valg[i], valg[i]); } </script> </head> <body onLoad="document.frm.sFelt.focus();"> <h2>Dynamisk select-boks</h2> <form name="frm"> <input type="text" name="sFelt" onKeyUp="opdater(this);" style="width: 150px;"><br /> <select multiple="multiple" size="8" name="sel" style="width: 150px;"> <script type="text/javascript"> for (i = 0; i < valg.length; i++) document.write('<option value="' + valg[i] + '">' + valg[i] + '</option>'); </script> </select><br /><br /> <input type="submit" value="Send"> </form> </body> </html>
efter (meget) lang tids pause fra dette projekt, vender jeg nu tilbage:
Hvorledes kan man ovensående i forbindelse med denne:
<form action="main.asp?page=inc_opgave.asp&opgave=personlig" method="post" name="formpersonal1"> <select name="Ansvarlig" size="1" onChange="document.formpersonal1.submit()" style="<%=StrObjStyle%>"> <% if request.form("ansvarlig") = "" then %> <option> Vælg person </option> <% else %> <% '#################### henter info om nuværende valgte bruger ################## Set conName = CreateObject("ADODB.Connection") Set comName = CreateObject("ADODB.Command") conName.Provider = "ADsDSOObject" conName.Open "Active Directory Provider", user, passwd Set ComName.ActiveConnection = conName ComName.CommandText = "select cn, sAMAccountName, department from '"&sAdsPathDC&"' WHERE objectClass='user' AND objectCategory='person' And sAMAccountName ='"&request.form("ansvarlig")&"'" Set rsName = ComName.Execute StrAnsvarligAfdeling = rsName.Fields("department") %> <option value="<%=request.form("ansvarlig")%>" selected><%=rsName.Fields("cn")%> (<%=rsName.Fields("sAMAccountName")%>)</option> <% end if %>
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
Ny bruger
Nybegynder
Opret
Preview
