Avatar billede haase Nybegynder
09. oktober 2002 - 22:31 Der er 3 kommentarer og
1 løsning

Hvad går der galt her

Tabellen og skriften skal ændres hvis Request.ServerVariables("KategoriID") og rsKateogori("KategoriID") er identiske....
Men jeg kan ikke få det til at virke

 


  <table height="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="13"> <span class="broedBold"> &nbsp;&gt;&gt;&gt; v&aelig;lg
            kategori</span>&nbsp;&nbsp; </td>
      <%
While ((Repeat1__numRows <> 0) AND (NOT rsKateogori.EOF))
%>

          <td
          <% If (Request.QueryString("KategoriID")) = (rsKateogori.Fields.Item("KategoriID"))  Then Response.Write "bgcolor=""#FFFFFF""" Else  Response.Write "bgcolor=""#6A6144""" %> ><center>&nbsp;<A HREF="indexvis.asp?<%= MM_keepNone & MM_joinChar(MM_keepNone) & "KategoriID=" & rsKateogori.Fields.Item("KategoriID").Value %>" <% If (Request.QueryString("KategoriID")) = (rsKateogori.Fields.Item("KategoriID"))  Then Response.Write "class=""broedBrun""" Else  Response.Write "class=""broed""" %> ><%=(rsKateogori.Fields.Item("KategoriNavn").Value)%></A>&nbsp;</center>
          </td>
   
      <%
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  rsKateogori.MoveNext()
Wend
%>
    </tr>
      </table>
Avatar billede haase Nybegynder
09. oktober 2002 - 22:33 #1
Det er naturligvis Request.QueryString("KategoriID") og rsKateogori("KategoriID")
Avatar billede coltau Juniormester
09. oktober 2002 - 22:47 #2
Hvis det er en talværdi kan du jo prøve denne:

If CInt(Request.QueryString("KategoriID")) = CInt(rsKateogori.Fields.Item("KategoriID")) then
Avatar billede coltau Juniormester
09. oktober 2002 - 23:13 #3
Eller hvad med lidt mere overblik - det ser ud til at du mangler nogle "end if"' er.

While ((Repeat1__numRows <> 0) AND (NOT rsKateogori.EOF))
  If (Request.QueryString("KategoriID") = rsKateogori("KategoriID"))  Then
    strClass = "class = 'broedBrun'"
    strColor = "bgcolor = '#FFFFFF'"
  else
    strCalss = "class = "'broed'"
    strColor = "bgcolor = '#6A6144'"
  end if

  Response.Write "<td " & strColor & "><center>&nbsp;<A HREF='indexvis.asp?"
  Response.Write MM_keepNone & MM_joinChar(MM_keepNone) & "KategoriID=" & rsKateogori("KategoriID").Value & "' "
  Response.Write strClass & rsKateogori("KategoriNavn").Value & "</A>&nbsp;</center></td>"
   
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  rsKateogori.MoveNext()
Wend
Avatar billede haase Nybegynder
09. oktober 2002 - 23:16 #4
Pefekt det virker.....
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