Notifikationer

Markér alle som læst Log ud

mortency Nybegynder

04. februar 2005 - 10:54 Der er 20 kommentarer og
1 løsning

Dynamisk dropdown fra database

Jeg skal lage en dynamisk select hvor brukerne skal kunne fylle ut noen text felt og velge fylke og kommune. Hvordan skal jeg lage dette? Skjemaet skal også kunne redigeres.

tblFylke
- FID (int)
- Fylke (varchar)

tblKommuner
- KID (int)
- FK_FID (int) rel til tblFylke.FID
- Kommune (varchar)

Private Sub Fylker()

Dim fylkeList

strSql = "SELECT FID,Fylke FROM " & strTablePrefix & "Fylker ORDER BY Fylke ASC"

Dim rsQuery : Set rsQuery = Server.CreateObject("ADODB.Recordset")
rsQuery.Open strSql, objConn, 3, 1, &H0000

If Not rsQuery.Eof Then
Do until rsQuery.EOF
fylkeList = fylkeList & "<option value=""" & rsQuery(0) & """>" & rsQuery(1) & "</option>"
rsQuery.moveNext
Loop
End If

rsQuery.Close : Set rsQuery = Nothing

Response.Write "<SELECT size='1' id='formFylke' name='formFylke' onCange='return false;'>"
Response.Write(fylkeList)
Response.Write "</SELECT>"
End Sub

Private Sub Kommuner(FylkeID)

Dim KommuneList

strSql = "SELECT KID,Kommune FROM " & strTablePrefix & "Kommuner FK_FID=" & FylkeID & " WHERE ORDER BY Kommuner ASC"

Dim rsQuery : Set rsQuery = Server.CreateObject("ADODB.Recordset")
rsQuery.Open strSql, objConn, 3, 1, &H0000

If Not rsQuery.Eof Then
Do until rsQuery.EOF
KommuneList = KommuneList & "<option value=""" & rsQuery(0) & """>" & rsQuery(1) & "</option>"
rsQuery.moveNext
Loop
End If

rsQuery.Close : Set rsQuery = Nothing

Response.Write "<SELECT size='1' id='formFylke' name='formFylke'>"
Response.Write(KommuneList)
Response.Write "</SELECT>"
End Sub

Synes godt om

bramsing Nybegynder

04. februar 2005 - 11:57 #1

<select name="select" id="select" onChange="this.form.submit();">
<option selected value="00">Vælg på listen</option>
<%do while not rs.eof%>
<option value="<%=rs("id")%>"><%=rs("tekst")%></option>
<%rs.movenext
loop%>
</select>

Synes godt om

eagleeye Praktikant

04. februar 2005 - 12:03 #2

Skal de være afhængige som dette eks?
http://roenving.users.whitehat.dk/index.html?/WD4Selects-beta.html

Synes godt om

mortency Nybegynder

04. februar 2005 - 12:04 #3

//Eagleeye

Ja to selects. fra database

Synes godt om

bramsing Nybegynder

04. februar 2005 - 12:05 #4

%><select name="formFylke" id="formFylke">
<option selected value="00">Vælg på listen</option>
<%do while not rsQuery.eof%>
<option value="<%=rsQuery(0)%>"><%=rsQuery(1)%></option>
<%rsQuery.movenext

Kan også være du kan bruge din egen løsning ved at flytte lidt rundt på tingene...

tblFylke
- FID (int)
- Fylke (varchar)

tblKommuner
- KID (int)
- FK_FID (int) rel til tblFylke.FID
- Kommune (varchar)

Private Sub Fylker()

Dim fylkeList

strSql = "SELECT FID,Fylke FROM " & strTablePrefix & "Fylker ORDER BY Fylke ASC"

Dim rsQuery : Set rsQuery = Server.CreateObject("ADODB.Recordset")
rsQuery.Open strSql, objConn, 3, 1, &H0000

If Not rsQuery.Eof Then
Do until rsQuery.EOF
fylkeList = fylkeList & "<option value=""" & rsQuery(0) & """>" & rsQuery(1) & "</option>"
rsQuery.moveNext
Loop
End If

rsQuery.Close : Set rsQuery = Nothing

Response.Write "<SELECT size='1' id='formFylke' name='formFylke' onCange='return false;'>"
Response.Write(fylkeList)
Response.Write "</SELECT>"
End Sub

Private Sub Kommuner(FylkeID)

Dim KommuneList

strSql = "SELECT KID,Kommune FROM " & strTablePrefix & "Kommuner FK_FID=" & FylkeID & " WHERE ORDER BY Kommuner ASC"

Dim rsQuery : Set rsQuery = Server.CreateObject("ADODB.Recordset")
rsQuery.Open strSql, objConn, 3, 1, &H0000

If Not rsQuery.Eof Then
Do until rsQuery.EOF
KommuneList = KommuneList & "<option value=""" & rsQuery(0) & """>" & rsQuery(1) & "</option>"
rsQuery.moveNext
Loop
End If

Response.Write "<SELECT size='1' id='formFylke' name='formFylke'>"
Response.Write(KommuneList)
Response.Write "</SELECT>"
End Sub
loop

rsQuery.Close
Set rsQuery = Nothing
%>
</select><%

Synes godt om

mortency Nybegynder

04. februar 2005 - 12:09 #5

//Bramsing det her kaller jo ikke functionen.... + at onChange="this.form.submit()" kjører jo scriptet og da blir det jo feil når man ikke har valgt kommune.

Synes godt om

bramsing Nybegynder

04. februar 2005 - 12:11 #6

Jeg havde overset at du skulle have 2 selects til at "snakke" sammen... sorry...

Synes godt om

eagleeye Praktikant

04. februar 2005 - 12:11 #7

Dette kode er et eksempel på to dropdown som er afhængige. Du skal nok lige putte en connection til databasen ind hvor kommentaren er.

<html>
<head>
<script>
var contentArr, subArr, tmp;
contentArr = new Array();
subArr = new Array();
contentArr[0] = null;
mainCounter = 1;
subCounter = 0;

function fillList( id ){
// Deleting all options
document.frm.targetSel.options.length = 0;

if( id > 0 ){
tmpArr = contentArr[ id ];
for( i = 0; i < tmpArr.length; i++ ){
document.frm.targetSel.options[ document.frm.targetSel.options.length ] = new Option( tmpArr[ i ], tmpArr[ i ] );
}
}
}

</script>
</head>
<body>
<form name="frm">
<select name="box" onchange="fillList( this.selectedIndex );">
<option value="">Vælg Amt</option>
<%
' CONNECT TIL DATASEN HER, INDSÆT KODE !

SQL = "SELECT * FROM AMT"
Set RS = Conn.Execute( SQL )
mainCounter = 1
subCounter = 1
while NOT RS.EOF
response.write "<option value=""" & RS("AMT") & """>" & RS("AMT") & "</option>"
subSQL = "SELECT * FROM KOMMUNER WHERE AMT = '" & RS("AMT") &"'"
Set subRS = Conn.Execute( subSQL )
while NOT subRS.EOF
%>
<script>
subArr[ subCounter ] = '<%= subRS("KOMMUNE") %>';
subCounter++;
</script>
<%
subRS.MoveNext
wend
subRS.Close
Set subRS = nothing
%>
<script>
contentArr[ mainCounter ] = subArr;
mainCounter++;
subArr = new Array();
subCounter = 0;
</script>
<%
RS.MoveNext
wend
RS.Close
Set RS = nothing
%>
</select><br>
<select name="targetSel">
<option value=""></option>
</select>
</form>
</body>
</html>

Synes godt om

mortency Nybegynder

04. februar 2005 - 13:34 #8

//Eagleeye
Jeg får feil: 'document.frm.targetsel' is null or not an object

Koden ser slik ut:

<head>
<script>
var contentArr, subArr, tmp;
contentArr = new Array();
subArr = new Array();
contentArr[0] = null;
mainCounter = 1;
subCounter = 0;

function fillList( id ){
// Deleting all options
document.frm.targetSel.options.length = 0;

if( id > 0 ){
tmpArr = contentArr[ id ];
for( i = 0; i < tmpArr.length; i++ ){
document.frm.targetSel.options[ document.frm.targetSel.options.length ] = new Option( tmpArr[ i ], tmpArr[ i ] );
}
}
}

</script>
</head>

Private Sub FylkerogKommuner()

Dim strSqlMain,strSqlSub,List,mainCounter,subCounter

strSqlMain = "SELECT FID,Fylke FROM " & strTablePrefix & "Fylker ORDER BY Fylke ASC"

Dim rsQueryMain : Set rsQueryMain = Server.CreateObject("ADODB.Recordset")
rsQueryMain.Open strSqlMain, objConn, 3, 1, &H0000

mainCounter = 1
subCounter = 1

While NOT rsQueryMain.EOF
Response.Write "<option value=""" & rsQueryMain(0) & """>" & rsQueryMain(1) & "</option>"
strSqlSub = "SELECT KID,Kommune FROM " & strTablePrefix & "Kommuner WHERE FK_FID=" & rsQueryMain(0) & " ORDER BY Kommune ASC"

Dim rsQuerySub : Set rsQuerySub = Server.CreateObject("ADODB.Recordset")
rsQuerySub.Open strSqlSub, objConn, 3, 1, &H0000
While NOT rsQuerySub.EOF
%>
<script>
subArr[ subCounter ] = '<%= rsQuerySub(1)%>';
subCounter++;
</script>
<%
rsQuerySub.MoveNext
Wend
rsQuerySub.Close : Set rsQuerySub = Nothing
%>
<script>
contentArr[ mainCounter ] = subArr;
mainCounter++;
subArr = new Array();
subCounter = 0;
</script>
<%
rsQueryMain.moveNext
Wend
rsQueryMain.Close : Set rsQueryMain = Nothing
End Sub

osv....

<select name="box" onchange="fillList( this.selectedIndex );">
<option value="">Velg.....</option>
<%Call FylkerogKommuner()'DENNE SJEKK DENNE%>
</select><br>
<select name="targetSel">
<option value=""></option>
</select>

osv....

Synes godt om

eagleeye Praktikant

04. februar 2005 - 13:51 #9

ok prøv sådan her med <form> tags omkring de to select bokse. formen skal hedde frm name="frm":

<head>
<script>
var contentArr, subArr, tmp;
contentArr = new Array();
subArr = new Array();
contentArr[0] = null;
mainCounter = 1;
subCounter = 0;

function fillList( id ){
// Deleting all options
document.frm.targetSel.options.length = 0;

if( id > 0 ){
tmpArr = contentArr[ id ];
for( i = 0; i < tmpArr.length; i++ ){
document.frm.targetSel.options[ document.frm.targetSel.options.length ] = new Option( tmpArr[ i ], tmpArr[ i ] );
}
}
}

</script>
</head>

Private Sub FylkerogKommuner()

Dim strSqlMain,strSqlSub,List,mainCounter,subCounter

strSqlMain = "SELECT FID,Fylke FROM " & strTablePrefix & "Fylker ORDER BY Fylke ASC"

Dim rsQueryMain : Set rsQueryMain = Server.CreateObject("ADODB.Recordset")
rsQueryMain.Open strSqlMain, objConn, 3, 1, &H0000
%>
mainCounter = 1
subCounter = 1
<%
While NOT rsQueryMain.EOF
Response.Write "<option value=""" & rsQueryMain(0) & """>" & rsQueryMain(1) & "</option>"
strSqlSub = "SELECT KID,Kommune FROM " & strTablePrefix & "Kommuner WHERE FK_FID=" & rsQueryMain(0) & " ORDER BY Kommune ASC"

Dim rsQuerySub : Set rsQuerySub = Server.CreateObject("ADODB.Recordset")
rsQuerySub.Open strSqlSub, objConn, 3, 1, &H0000
While NOT rsQuerySub.EOF
%>
<script>
subArr[ subCounter ] = '<%= rsQuerySub(1)%>';
subCounter++;
</script>
<%
rsQuerySub.MoveNext
Wend
rsQuerySub.Close : Set rsQuerySub = Nothing
%>
<script>
contentArr[ mainCounter ] = subArr;
mainCounter++;
subArr = new Array();
subCounter = 0;
</script>
<%
rsQueryMain.moveNext
Wend
rsQueryMain.Close : Set rsQueryMain = Nothing
End Sub

<form name="frm" action="" method="post">
<select name="box" onchange="fillList( this.selectedIndex );">
<option value="">Velg.....</option>
<%Call FylkerogKommuner()'DENNE SJEKK DENNE%>
</select><br>
<select name="targetSel">
<option value=""></option>
</select>

</form>

Synes godt om

mortency Nybegynder

04. februar 2005 - 14:34 #10

//Eagleeye

Det virker nå bortsett fra at

<select name="targetSel">
<option value=""></option>

valuen i denne er ikke tall men kommune navnet dette value skal vær KID og kommunen skal sees:

<script>
subArr[ subCounter ] = '<%= rsQuerySub(1)%>';
subCounter++;
</script>

Og en ting til scriptet er vanvittig tregt. Hva kan dette komme av? Det er 19 fylker og 434 kommuner.

Kan det ha noe med at den skriver <script></script> hele tiden?

<option value="1">Akerhus</option>
<script>
subArr[ subCounter ] = 'Asker';
subCounter++;
</script>

<script>
subArr[ subCounter ] = 'Aurskog-Høland';
subCounter++;
</script>

<script>
subArr[ subCounter ] = 'Bærum';
subCounter++;
</script>

<script>
subArr[ subCounter ] = 'Eidsvoll';
subCounter++;
</script>
OSV.........................

Synes godt om

eagleeye Praktikant

04. februar 2005 - 14:44 #11

Ja det skulle faktisk kun være en gang der skal så <script> og </script>. Den henter alle fylker og alle 434 kommuner ind på siden for at bruge det i javascriptet.

Jeg har et andet script som måske kan bruges det er godt nok med 3 combo boke lige nu så det skal lige rettes til så det er to. Det kan jeg prøve.

Synes godt om

mortency Nybegynder

04. februar 2005 - 14:46 #12

Supert:

Synes godt om

eagleeye Praktikant

04. februar 2005 - 16:14 #13

Jeg har ikke glemt dig. Her er koden der er noget mere javascritp kode i dette men tilgengæld tilgår man kun databasen 1 gang og har et loop hvor arrayet til javascritpet laves.

<html>
<head>
<script language="javascript" type="text/javascript">
function initSels(){
createOpts(document.getElementById('fylke'));
}

function createOpts(sel){
var s = new Array();
var num = 0, txt = "arr";
var ar = opt = null;
var n = sel.selectedIndex;
var args = createOpts.arguments.length;
for(var i=1;args>i;i++){
s[i-1] = document.getElementById(createOpts.arguments[i]);
if(s[i-1]==sel)num=i;
}
if(args>1){
if(s[num])sel = s[num];
else return;
}
if(n==0&&args>1){
for(i=num;args>i+1;i++){
s[i].length = 0;
opt = document.createElement('OPTION');
s[i].appendChild(opt);
opt.value = "";
opt.text = "\74-- Vælg --";
}
return true
};
for(i=0;num>i;i++){
txt+="["+(s[i].selectedIndex-1)+"][1]";
}
ar = eval(txt);
sel.length = 0;
opt = document.createElement('OPTION');
sel.appendChild(opt);
opt.value = "";
opt.text = "-- Vælg --";
for(i=0;ar.length>i;i++){
opt = document.createElement('OPTION');
sel.appendChild(opt);
if(typeof ar[i] == 'object'){
var str = ar[i][0];
tarr=str.split("¤¤¤");
opt.value = tarr[0];
opt.text = tarr[1];
}else{
var str = ar[i];
tarr=str.split("¤¤¤");
opt.value = tarr[0];
opt.text = tarr[1];
}
}
if(args>num+2){
for(i=num+1;args-1>i;i++){
s[i].length = 0;
opt = document.createElement('OPTION');
s[i].appendChild(opt);
opt.value = "";
opt.text = "\74-- Vælg --";
}
}
}
</script>
</head>
<body onload="initSels()">

<%
Private Sub FylkerogKommuner()

Dim strSqlMain,strSqlSub,List,mainCounter,subCounter
Dim rsQueryMain : Set rsQueryMain = Server.CreateObject("ADODB.Recordset")

strSqlMain = "SELECT FID,Fylke, KID,Kommune FROM " & strTablePrefix & "Fylker LEFT JOIN " & strTablePrefix & "Kommuner ON " & strTablePrefix & "Fylker.FID=" & strTablePrefix & "Kommuner.FK_FID"
strSqlMain =strSqlMain & " ORDER BY Fylke, Kommune ASC"

rsQueryMain.Open strSqlMain, objConn, 3, 1, &H0000
%>

<script language="javascript" type="text/javascript">
var arr = [
<%
oldValg1 = ""
do while not rsQueryMain.EOF
if Cstr(oldValg1) <> CStr(rsQueryMain("FID")) then
Response.write "['" & rsQueryMain("FID") & "¤¤¤" & rsQueryMain("Fylke") & "', [" & vbCrLf
oldValg1 = rsQueryMain("FID")
end if
Response.write "'" & rsQueryMain("KID") & "¤¤¤" & rsQueryMain("Kommune") & "'"

rsQueryMain.Movenext

if not rsQueryMain.EOF then
endValg = false
if CStr(oldValg1) <> CStr(rsQueryMain("FID")) then
Response.write "]]"
endValg = true
end if
Response.write ","
if endValg = true then response.write vbCrLf
else
Response.write "]]"
end if
loop
rsQueryMain.Close
Set rsQueryMain=Nothing
%>
];
</script>
<%
End sub
%>

<form name="sels" action="">
<select name="fylke" id="fylke" onchange="createOpts(this,'fylke','kommune');">
<option value="" selected>Vis alle</option>
<%Call FylkerogKommuner()'DENNE SJEKK DENNE%>
</select>
<br><br>
<select name="kommune" id="kommune">
<option value="" selected ><-- Vælg --</option>
</select>
<br><br>
<input type="submit" name="send" value="send">
</from>

</body>
</html>

Synes godt om

mortency Nybegynder

07. februar 2005 - 10:16 #14

//Eagleeye

Beklager at jeg ikke har fått svart før nå.

det er noe feil med fylke den lister ut: var arr [ ['1¤¤¤Akerhus'['1¤¤¤Asker','2¤¤¤ osv......

Hva er dette? Takk for hjelpen så langt.

//Morten

Synes godt om

mortency Nybegynder

07. februar 2005 - 10:25 #15

if not rsQueryMain.EOF then
endValg = false
if CStr(oldValg1) <> CStr(rsQueryMain("FID")) then
Response.write "]]"
endValg = true
end if
Response.write ","
if endValg = true then response.write vbCrLf
else
Response.write "]]" 'Denne linje skrives ikke ut.
end if

Synes godt om

eagleeye Praktikant

07. februar 2005 - 20:25 #16

Meningen er den laver et array til javascriptet som ser ud i stil med:

var arr = [
['Select1-1', ['Select2-1 for select1-1','Select2-2 for select1-1', 'Select2-3 for select1-1']],
['Select1-2', ['Select2-1 for select1-2','Select2-2 for select1-2']],
['Select1-3', ['Select2-1 for select1-3','Select2-2 for select1-3']]
];

Den skulle helt skriver den sidste linje ud med ]] da det afslutter den sidste post. Er koden copy/paste af min eller?

Synes godt om

eagleeye Praktikant

07. februar 2005 - 20:34 #17

Det som ligger i hver er eksempelvis: '1¤¤¤Akerhus'
1 er ID'et og Akerhus er navnet på fylke, javascriptet laver en split på "¤¤¤" og ligger ID'et ind i value for selectet og navnet som det teskt som kommer frem i drop-down boksen.

Synes godt om

mortency Nybegynder

08. februar 2005 - 10:11 #18

//Eagleeye

Ja koden er copy/past av din kode.

Arrayet ser slik ut:

<script language="javascript" type="text/javascript">
var arr = [
['1¤¤¤Akerhus', [
'1¤¤¤Asker','2¤¤¤Aurskog-Høland','3¤¤¤Bærum','4¤¤¤Eidsvoll','5¤¤¤Enebakk','6¤¤¤Fet','7¤¤¤Frogn','8¤¤¤Gjerdrum','9¤¤¤Hurdal','10¤¤¤Lørenskog','11¤¤¤Nannestad','12¤¤¤Nes','13¤¤¤Nesodden','14¤¤¤Nittedal','15¤¤¤Oppegård','16¤¤¤Rælingen','17¤¤¤Skedsmo','18¤¤¤Ski','19¤¤¤Sørum','20¤¤¤Ullensaker','21¤¤¤Vestby','22¤¤¤Ås']],
['2¤¤¤Aust-Agder', [
'23¤¤¤Arendal','24¤¤¤Birkenes','25¤¤¤Bygland','26¤¤¤Bykle','27¤¤¤Evje og Hornnes','28¤¤¤Froland','29¤¤¤Gjerstad','30¤¤¤Grimstad','31¤¤¤Iveland','32¤¤¤Lillesand','33¤¤¤Risør','34¤¤¤Tvedestrand','35¤¤¤Valle','36¤¤¤Vegårdshei','37¤¤¤Åmli']],
['3¤¤¤Buskerud', [
'38¤¤¤Drammen','39¤¤¤Flesberg','40¤¤¤Flå','41¤¤¤Gol','42¤¤¤Hemsedal','43¤¤¤Hol','44¤¤¤Hole','45¤¤¤Hurum','46¤¤¤Kongsberg','47¤¤¤Krødsherad','48¤¤¤Lier','49¤¤¤Modum','50¤¤¤Nedre Eiker','51¤¤¤Nes','52¤¤¤Nore og Uvdal','53¤¤¤Ringerike','54¤¤¤Rollag','55¤¤¤Røyken','56¤¤¤Sigdal','57¤¤¤Øvre Eiker','58¤¤¤Ål']],
['4¤¤¤Finnmark', [
'59¤¤¤Alta','60¤¤¤Berlevåg','61¤¤¤Båtsfjord','62¤¤¤Gamvik','63¤¤¤Hammerfest','64¤¤¤Hasvik','65¤¤¤Karasjok','66¤¤¤Kautokeino','67¤¤¤Kvalsund','68¤¤¤Lebesby','69¤¤¤Loppa','70¤¤¤Måsøy','71¤¤¤Nesseby','72¤¤¤Nordkapp','73¤¤¤Porsanger','74¤¤¤Sør-Varanger','75¤¤¤Tana','76¤¤¤Vadsø','77¤¤¤Vardø']],
['5¤¤¤Hedemark', [
'78¤¤¤Alvdal','79¤¤¤Eidskog','80¤¤¤Elverum','81¤¤¤Engerdal','82¤¤¤Folldal','83¤¤¤Grue','84¤¤¤Hamar','85¤¤¤Kongsvinger','86¤¤¤Løten','87¤¤¤Nord-Odal','88¤¤¤Os','89¤¤¤Rendalen','90¤¤¤Ringsaker','91¤¤¤Stange','92¤¤¤Stor-Elvdal','93¤¤¤Sør-Odal','94¤¤¤Tolga','95¤¤¤Trysil','96¤¤¤Tynset','97¤¤¤Våler','98¤¤¤Åmot','99¤¤¤Åsnes']],
['6¤¤¤Hordaland', [
'100¤¤¤Askøy','101¤¤¤Austevoll','102¤¤¤Austrheim','103¤¤¤Bergen','104¤¤¤Bømlo','105¤¤¤Eidfjord','106¤¤¤Etne','107¤¤¤Fedje','108¤¤¤Fitjar','109¤¤¤Fjell','110¤¤¤Fusa','111¤¤¤Granvin','112¤¤¤Jondal','113¤¤¤Kvam','114¤¤¤Kvinnherad','115¤¤¤Lindås','116¤¤¤Masfjorden','117¤¤¤Meland','118¤¤¤Modalen','119¤¤¤Odda','120¤¤¤Os','121¤¤¤Osterøy','122¤¤¤Radøy','123¤¤¤Samnanger','124¤¤¤Stord','125¤¤¤Sund','126¤¤¤Sveio','127¤¤¤Tysnes','128¤¤¤Ullensvang','129¤¤¤Ulvik','130¤¤¤Vaksdal','131¤¤¤Voss','132¤¤¤Øygarden']],
['7¤¤¤Møre og Romsdal', [
'133¤¤¤Aukra','134¤¤¤Aure','135¤¤¤Averøy','136¤¤¤Eide','137¤¤¤Frei','138¤¤¤Fræna','139¤¤¤Giske','140¤¤¤Gjemnes','141¤¤¤Halsa','142¤¤¤Haram','143¤¤¤Hareid','144¤¤¤Herøy','145¤¤¤Kristiansund','146¤¤¤Midsund','147¤¤¤Molde','148¤¤¤Nesset','149¤¤¤Norddal','150¤¤¤Rauma','151¤¤¤Rindal','152¤¤¤Sande','153¤¤¤Sandøy','154¤¤¤Skodje','155¤¤¤Smøla','156¤¤¤Stordal','157¤¤¤Stranda','158¤¤¤Sula','159¤¤¤Sunndal','160¤¤¤Surnadal','161¤¤¤Sykkylven','162¤¤¤Tingvoll','163¤¤¤Tustna','164¤¤¤Ulstein','165¤¤¤Vanylven','166¤¤¤Vestnes','167¤¤¤Volda','168¤¤¤Ørskog','169¤¤¤Ørsta','170¤¤¤Ålesund']],
['8¤¤¤Nordland', [
'171¤¤¤Alstahaug','172¤¤¤Andøy','173¤¤¤Ballangen','174¤¤¤Beiarn','175¤¤¤Bindal','176¤¤¤Bodø','177¤¤¤Brønnøy','178¤¤¤Bø','179¤¤¤Dønna','180¤¤¤Evenes','181¤¤¤Fauske','182¤¤¤Flakstad','183¤¤¤Gildeskål','184¤¤¤Grane','185¤¤¤Hadsel','186¤¤¤Hamarøy','187¤¤¤Hattfjelldal','188¤¤¤Hemnes','189¤¤¤Herøy','190¤¤¤Leirfjord','191¤¤¤Lurøy','192¤¤¤Lødingen','193¤¤¤Meløy','194¤¤¤Moskenes','195¤¤¤Narvik','196¤¤¤Nesna','197¤¤¤Rana','198¤¤¤Rødøy','199¤¤¤Røst','200¤¤¤Saltdal','201¤¤¤Skjerstad','202¤¤¤Sortland','203¤¤¤Steigen','204¤¤¤Sømna','205¤¤¤Sørfold','206¤¤¤Tjeldsund','207¤¤¤Træna','208¤¤¤Tysfjord','209¤¤¤Vefsn','210¤¤¤Vega','211¤¤¤Vestvågøy','212¤¤¤Vevelstad','213¤¤¤Værøy','214¤¤¤Vågan','215¤¤¤Øksnes']],
['9¤¤¤Nord-Trøndelag', [
'216¤¤¤Flatanger','217¤¤¤Fosnes','218¤¤¤Frosta','219¤¤¤Grong','220¤¤¤Høylandet','221¤¤¤Inderøy','222¤¤¤Leka','223¤¤¤Leksvik','224¤¤¤Levanger','225¤¤¤Lierne','227¤¤¤Meråker','228¤¤¤Mosvik','226¤¤¤Namdalseid','229¤¤¤Namskogan','230¤¤¤Namsos','231¤¤¤Nærøy','232¤¤¤Overhalla','233¤¤¤Røyrvik','234¤¤¤Snåsa','235¤¤¤Steinkjer','236¤¤¤Stjørdal','237¤¤¤Verdal','238¤¤¤Verran','239¤¤¤Vikna']],
['10¤¤¤Oppland', [
'240¤¤¤Dovre','241¤¤¤Etnedal','242¤¤¤Gausdal','243¤¤¤Gjøvik','244¤¤¤Gran','245¤¤¤Jevnaker','246¤¤¤Lesja','247¤¤¤Lillehammer','248¤¤¤Lom','249¤¤¤Lunner','250¤¤¤Nord-Aurdal','251¤¤¤Nord-Fron','252¤¤¤Nordre Land','253¤¤¤Ringebu','254¤¤¤Sel','255¤¤¤Skjåk','256¤¤¤Søndre Land','257¤¤¤Sør-Aurdal','258¤¤¤Sør-Fron','259¤¤¤Vang','260¤¤¤Vestre Slidre','261¤¤¤Vestre Toten','262¤¤¤Vågå','263¤¤¤Østre Toten','264¤¤¤Øyer','265¤¤¤Øystre Slidre']],
['19¤¤¤Oslo', [
'434¤¤¤Oslo']],
['11¤¤¤Rogaland', [
'266¤¤¤Bjerkreim','267¤¤¤Bokn','268¤¤¤Eigersund','269¤¤¤Finnøy','270¤¤¤Forsand','271¤¤¤Gjesdal','272¤¤¤Haugesund','273¤¤¤Hjelmeland','274¤¤¤Hå','275¤¤¤Karmøy','276¤¤¤Klepp','277¤¤¤Kvitsøy','278¤¤¤Lund','279¤¤¤Randaberg','280¤¤¤Rennesøy','281¤¤¤Sandnes','282¤¤¤Sauda','283¤¤¤Sokndal','284¤¤¤Sola','285¤¤¤Stavanger','286¤¤¤Strand','287¤¤¤Suldal','288¤¤¤Time','289¤¤¤Tysvær','290¤¤¤Utsira','291¤¤¤Vindafjord','292¤¤¤Ølen']],
['12¤¤¤Sogn og Fjordane', [
'293¤¤¤Askvoll','294¤¤¤Aurland','295¤¤¤Balestrand','296¤¤¤Bremanger','297¤¤¤Eid','298¤¤¤Fjaler','299¤¤¤Flora','300¤¤¤Førde','301¤¤¤Gaular','302¤¤¤Gloppen','303¤¤¤Gulen','304¤¤¤Hornindal','305¤¤¤Hyllestad','306¤¤¤Høyanger','307¤¤¤Jølster','308¤¤¤Leikanger','309¤¤¤Luster','310¤¤¤Lærdal','311¤¤¤Naustdal','312¤¤¤Selje','313¤¤¤Sogndal','314¤¤¤Solund','315¤¤¤Stryn','316¤¤¤Vik','317¤¤¤Vågsøy','318¤¤¤Årdal']],
['13¤¤¤Sør-Trøndelag', [
'319¤¤¤Agdenes','320¤¤¤Bjugn','321¤¤¤Frøya','322¤¤¤Hemne','323¤¤¤Hitra','324¤¤¤Holtålen','325¤¤¤Klæbu','326¤¤¤Malvik','327¤¤¤Meldal','328¤¤¤Melhus','329¤¤¤Midtre Gauldal','330¤¤¤Oppdal','331¤¤¤Orkdal','332¤¤¤Osen','333¤¤¤Rennebu','334¤¤¤Rissa','335¤¤¤Roan','336¤¤¤Røros','337¤¤¤Selbu','338¤¤¤Skaun','339¤¤¤Snillfjord','340¤¤¤Trondheim','341¤¤¤Tydal','342¤¤¤Ørland','343¤¤¤Åfjord']],
['14¤¤¤Telemark', [
'344¤¤¤Bamble','345¤¤¤Bø','346¤¤¤Drangedal','347¤¤¤Fyresdal','348¤¤¤Hjartdal','349¤¤¤Kragerø','350¤¤¤Kviteseid','351¤¤¤Nissedal','352¤¤¤Nome','353¤¤¤Notodden','354¤¤¤Porsgrunn','355¤¤¤Sauherad','356¤¤¤Seljord','357¤¤¤Siljan','358¤¤¤Skien','359¤¤¤Tinn','360¤¤¤Tokke','361¤¤¤Vinje']],
['15¤¤¤Troms', [
'362¤¤¤Balsfjord','363¤¤¤Bardu','364¤¤¤Berg','365¤¤¤Bjarkøy','366¤¤¤Dyrøy','367¤¤¤Gratangen','368¤¤¤Harstad','369¤¤¤Ibestad','370¤¤¤Karlsøy','371¤¤¤Kvæfjord','372¤¤¤Kvænangen','373¤¤¤Kåfjord','374¤¤¤Lavangen','375¤¤¤Lenvik','376¤¤¤Lyngen','377¤¤¤Målselv','378¤¤¤Nordreisa','379¤¤¤Salangen','380¤¤¤Skjervøy','381¤¤¤Skånland','382¤¤¤Storfjord','383¤¤¤Sørreisa','384¤¤¤Torsken','385¤¤¤Tranøy','386¤¤¤Tromsø']],
['16¤¤¤Vest-Agder', [
'387¤¤¤Audnedal','388¤¤¤Farsund','389¤¤¤Flekkefjord','390¤¤¤Hægebostad','391¤¤¤Kristiansand','392¤¤¤Kvinesdal','393¤¤¤Lindesnes','394¤¤¤Lyngdal','395¤¤¤Mandal','396¤¤¤Marnardal','397¤¤¤Sirdal','398¤¤¤Songdalen','399¤¤¤Søgne','400¤¤¤Vennesla','401¤¤¤Åseral']],
['17¤¤¤Vestfold', [
'402¤¤¤Andebu','404¤¤¤Hof','405¤¤¤Holmestrand','403¤¤¤Horten','406¤¤¤Lardal','407¤¤¤Larvik','408¤¤¤Nøtterøy','415¤¤¤Re','409¤¤¤Sande','410¤¤¤Sandefjord','411¤¤¤Stokke','412¤¤¤Svelvik','413¤¤¤Tjøme','414¤¤¤Tønsberg']],
['18¤¤¤Østfold', [
'416¤¤¤Aremark','417¤¤¤Askim','418¤¤¤Eidsberg','419¤¤¤Fredrikstad','420¤¤¤Halden','421¤¤¤Hobøl','422¤¤¤Hvaler','423¤¤¤Marker','424¤¤¤Moss','425¤¤¤Rakkestad','426¤¤¤Rygge','427¤¤¤Rømskog','428¤¤¤Råde','429¤¤¤Sarpsborg','430¤¤¤Skiptvet','431¤¤¤Spydeberg','432¤¤¤Trøgstad','433¤¤¤Våler']]
];
</script>

Synes godt om

eagleeye Praktikant

08. februar 2005 - 19:19 #19

Ja det ser fint ud. Virker det ikke?

Du skal havde en onload funtion tilføjet til body tagen, så den initialisere den første drop-down:

<body onload="initSels()">

Synes godt om

eagleeye Praktikant

11. februar 2005 - 22:00 #20

Virkede det?
eller får du fejl?

Synes godt om

mortency Nybegynder

06. april 2005 - 15:50 #21

Takk for hjelpen. Dette virker nå.

Synes godt om

Ny bruger Nybegynder

Din løsning...

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS