"Holde" på værdi i dropdown box
Hej Eksperter,Jeg har en dropdown box der bestemmer indholdet af en anden dropdown boks, på samme side. Det hele er lavet i Asp/Javascript. Når værdien i 1. dropdownbox vælges genlæser den siden og sætter værdien for næste dropdown box. Dette virker fint, men den nulstiller sig selv. Alså viser den 1. dropdown boksen altid første post i min DB. Jeg vil gerne have denne til at holde værdien sådan at dropdown boks 1 og 2 har relaterende data. Håber i kan forstå dette.
Min side ligger her så i kan se det.
http://dell97.eit.iha.dk/praktikf2004/test.asp
og koden ser således ud:
<%@LANGUAGE="JavaScript"%>
<html>
<head>
<meta http-equiv="Content-Type"
content="text/html; charset=iso-8859-1">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<title>Landkort over specialer og kompetencer indenfor medicoområdet</title>
</head>
<p align="center"><img src="aulogo.gif" width="150" height="150">
<br>
<font size="6">Landkort over specialer og kompetencer indenfor medicoområdet</font>
<br>
Vælg et nøgleord:<br>
<form action="test.asp" method="GET" name="form1">
<p align="center">
<font size="3">
Nøgleord :
<select name="Value1" onChange= "document.form1.submit()">
<%
//------------CONNECT TO DB--------------------------------
// con = Server.CreateObject("ADODB.Connection");
// con.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\db1.mdb");
var con = Server.CreateObject("ADODB.Connection");
Response.Write(Application('db1_ConnectionString')); // 26/4
// con.Open(DRIVER={Microsoft Access Driver (*.mdb)};DBQ=c:\inetpub\wwwroot\praktikf2004\db1.mdb);
con.Open(Application("db1_ConnectionString"));// Denne line giver fejl
// con.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=http://dell97.eit.iha.dk/praktikf2004/db1.mdb");
//------------EXTRACT DATA-------------------------------
// Response.Write(Application('db1_ConnectionString')); //26/4
RS= con.Execute("SELECT * FROM BMT Order By Nøgleord");
var Key; var Id;
while(!RS.EOF)
{
Key= RS("Nøgleord");
id = RS("Id");
//----------DISPLAY HTML
%>
<option value= "<% =id %>"> <% =Key %> </option>
<%
//-----------------------
RS.MoveNext;
}
//------------CLOSE DB
RS.Close();
con.Close();
//Set Conn = Nothing;// 21/4
RS = null;
con =null;
//------------END OF DB STUFF %>;
</select></font>
</p>
</form>
<p align="center">Vælg beskrivelse af aktivitet:</p>
<body>
<body>
<form action="side4.asp" method="submit">
<p align="center">
<font size="3">
Aktivitet :
<select name="Value2">
<%
//------------CONNECT TO DB--------------------------------
// con = Server.CreateObject("ADODB.Connection");
// con.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\db1.mdb");
con = Server.CreateObject("ADODB.Connection");
con.Open(Application('db1_ConnectionString'));// HUSK ADODB OPSÆTNING OGSÅ PÅ SERVER
// con.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=http://dell97.eit.iha.dk/praktikf2004/db1.mdb"); BRUGES PÅ HJEMME PC
//------------EXTRACT DATA-------------------------------
var val = Request.Querystring('value1');
if(val > "0")
{
RS= con.Execute("SELECT * FROM BMT2 WHERE Id = " + Request.queryString('Value1') ); //
var Key; var Id;
while(!RS.EOF)
{
Keys=RS('Key'); //
Id=RS('NøgleordID'); //
//----------DISPLAY HTML
%>
<option value= "<% =Id %>"> <% =Keys %> </option>
<%
//-----------------------
RS.MoveNext;
}
//------------CLOSE DB
RS.Close();
con.close();
RS = null;
con =null;
//------------END OF DB STUFF %>
</select></font><p align="center">Søg efter institutioner og nøglepersoner der beskæftigere sig med området.</p>
<p align="center"><input type="submit" name="B2" value="Søg">
</p>
</form>
<p>
<%
}
else
{
%>
<option value= "0"> Vælg en værdi i boksen overfor </option>
</select></font>
</p>
</form>
<%
}
%>
