Avatar billede rickie Juniormester
24. januar 2005 - 15:39 Der er 2 kommentarer og
1 løsning

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?
Avatar billede baitianlong Nybegynder
24. januar 2005 - 15:54 #1
Så vidt jeg kan se vil de da aldrig komme videre end første elseif!

CountryId=Request.QueryString("CountryId")
....
ElseIf Request.QueryString("CountryId") = CountryId Then

Det er den jo! Det har du jo lige fortalt den at den skal være!
Avatar billede rickie Juniormester
24. januar 2005 - 16:04 #2
Hvordan gør jeg så når jeg vil:
Jeg har prøvet mange forskellig måder! Bla:
<%If Request.QueryString("CountryId") = "" Or Request.QueryString("CountryId") = CountryId Then%>

Jeg forstår det således: Er CountryId = med intet eller lig med noget, så udføres det.
Filen DB2 indeholder følgende:
<%
connStr = "Provider=sqloledb.1;Network Library=DBMSSOCN;Data Source=DE-PGM; Initial Catalog=DKprod;User ID=sa;Password=sp/2001/9"
set conn = Server.CreateObject("ADODB.Connection")
set rs = server.createobject("adodb.recordset")
conn.Open connStr
%>

<select name="DB2" style="width:160" onchange="linkselect (this.options[this.selectedIndex].value)">
<option>TEST</option>
<option>Välj klient</option>
<%
sqlquery ="select CreditorNo, Name from niCredit"
rs.Open sqlquery, conn
Do While Not Rs.EOF
Response.Write "<option value='index.asp?CreditorNo="&rs("CreditorNo")&"'>"& rs("Name")&"</option>"
Rs.MoveNext
Loop
%>
</select>

Dette burde jo resultere i at den gå til index.asp?CreditorNo, eller?
Hvis ikke - hvordan skal jeg gøre?
Avatar billede rickie Juniormester
21. marts 2005 - 10:35 #3
Lukker!
Avatar billede 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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

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