Request.QueryString virker ikke
Hej,Jeg er ved at bide mine negle helt ned :)
Hvorfor virker dette ikke?
Jeg vil have at en select box fortsætter til næste osv.
--> INDEX.ASP <--
<%
dim connStr, rs, conn, sqlquery
%>
<%
CountryId=Request.QueryString("CountryId")
CreditorNo=Request.QueryString("CreditorNo")
Name=Request.QueryString("Name")
RegDate=Request.QueryString("RegDate")
%>
<%If Request.QueryString("CountryId") = "" Then%>
<table border="0" cellspacing="5" cellpadding="2">
<tr>
<td width="240" height="65" class="Act"><div class="DBox1"><!-- #Include File="DB1.asp" --></div></td>
<td width="240" height="65" class="Wai"></td>
<td width="240" height="65" class="Wai"></td>
<td width="240" height="65" class="Act">Välj land</td>
</tr>
</table>
<%ElseIf Request.QueryString("CountryId") = CountryId Then%>
<table border="0" cellspacing="5" cellpadding="2">
<tr>
<td width="240" height="65" class="Act"><div class="DBox1"><!-- #Include File="DB1.asp" --></div></td>
<td width="240" height="65" class="Wai"><div class="DBox2"><!-- #Include File="DB2.asp" --></td>
<td width="240" height="65" class="Wai"></td>
<td width="240" height="65" class="Act">Land valt!</td>
</tr>
</table>
<%ElseIf Request.QueryString("CreditorNo") = CreditorNo Then%>
<table border="0" cellspacing="5" cellpadding="2">
<tr>
<td width="240" height="65" class="Act"></td>
<td width="240" height="65" class="Wai"></div></td>
<td width="240" height="65" class="Wai"></td>
<td width="240" height="65" class="Act">Välj klient</td>
</tr>
</table>
<%End If%>
--> DB1.ASP <--
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("data/data.mdb")&";"
%>
<select name="DB1" style="width:160" onchange="linkselect (this.options[this.selectedIndex].value)">
<%
SQL = "SELECT CountryId, CountryStandard FROM DBCountry"
Set rs = Conn.Execute(SQL)
Do While Not rs.EOF
Response.Write "<option value='index.asp?CountryId="&rs("CountryId")&"'>"&rs("CountryStandard")&"</option>"
rs.MoveNext
Loop
%>
</select>
Det er måske slet ikke muligt at have flere forskellige Request.QueryString, eller?
