Avatar billede mekaniker Nybegynder
18. december 2001 - 18:23 Der er 6 kommentarer og
1 løsning

hvorfor kan man ikke dette

Error Type:
ADODB.Field (0x80020009)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/jens/filmsite/admin/forside.asp

<%
Set myConn = Server.CreateObject(\"ADODB.Connection\")
  myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"& Server.MapPath(\"../db/varer.mdb\")

  strSQL = \"SELECT * FROM Annonce \"
  set rs = myconn.execute(strSQL)

\'Response.write \"<td rowspan=\"\"2\"\"><img src=\"\"\"& Billede &\"\"\"></td></tr>\"

%>
<table width=\"95%\" border=\"2\" cellspacing=\"4\" cellpadding=\"0\" height=\"145\" bordercolor=\"#003366\" align=\"center\">
<tr>
    <td width=\"50%\" height=\"129\">
      <table width=\"100%\" border=\"1\" cellspacing=\"0\" cellpadding=\"2\" bgcolor=\"#CCCCCC\" height=\"100%\">
        <tr>
          <td colspan=\"2\" height=\"16\"> <b>
            <% Response.Write rs(\"varebeskrivelse\")%>
            </b> </td>
          <td rowspan=\"3\" width=\"36%\"><img src=\"../Images/produktbilleder/blomst.jpg\"></td>
        </tr>
        <tr>
          <td height=\"101\" colspan=\"2\" valign=\"top\">
            <% Response.Write rs(\"Stor_beskrivelse\")%>
          </td>
        </tr>
        <tr>
          <td width=\"31%\" valign=\"bottom\">Varenr.<b>
            <% Response.Write rs(\"varenr\")%>
            </b> </td>
          <td width=\"33%\" valign=\"bottom\">
            <div align=\"right\">DKK.&nbsp;<b>
              <% Response.Write formatnumber(rs(\"udsalgspris_incl_moms\"),2)%>
              </b> </div>
          </td>
        </tr>
      </table>
        <%
if rs.EOF then
Response.Write \"</td></tr>\"
else
rs.MoveNext
%>
</td>
    <td width=\"50%\" height=\"129\">
    <table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"2\" bgcolor=\"#CCCCCC\" height=\"100%\">
        <tr>
          <td colspan=\"2\" height=\"16\"> <b>
            <% Response.Write rs(\"varebeskrivelse\")%>
            </b> </td>
          <td rowspan=\"3\" width=\"36%\"><img src=\"../Images/produktbilleder/blomst.jpg\"></td>
        </tr>
        <tr>
          <td height=\"101\" colspan=\"2\" valign=\"top\">
            <% Response.Write rs(\"Stor_beskrivelse\")%>
          </td>
        </tr>
        <tr>
          <td width=\"31%\" valign=\"bottom\">Varenr.<b>
            <% Response.Write rs(\"varenr\")%>
            </b> </td>
          <td width=\"33%\" valign=\"bottom\">
            <div align=\"right\">DKK.&nbsp;<b>
              <% Response.Write formatnumber(rs(\"udsalgspris_incl_moms\"),2)%>
              </b> </div>
          </td>
        </tr>
      </table>
      <%
if rs.EOF then
Response.Write \"</td></tr>\"
else
rs.MoveNext
%>
<tr><td width=\"50%\" height=\"129\">
    <table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"2\" bgcolor=\"#CCCCCC\" height=\"100%\">
        <tr>
          <td colspan=\"2\" height=\"16\"> <b>
            <% Response.Write rs(\"varebeskrivelse\")%>
            </b> </td>
          <td rowspan=\"3\" width=\"36%\"><img src=\"../Images/produktbilleder/blomst.jpg\"></td>
        </tr>
        <tr>
          <td height=\"101\" colspan=\"2\" valign=\"top\">
            <% Response.Write rs(\"Stor_beskrivelse\")%>
          </td>
        </tr>
        <tr>
          <td width=\"31%\" valign=\"bottom\">Varenr.<b>
            <% Response.Write rs(\"varenr\")%>
            </b> </td>
          <td width=\"33%\" valign=\"bottom\">
            <div align=\"right\">DKK.&nbsp;<b>
              <% Response.Write formatnumber(rs(\"udsalgspris_incl_moms\"),2)%>
              </b> </div>
          </td>
        </tr>
      </table>
      </td>
   
      <%
if rs.EOF then
Response.Write \"</td></tr>\"
else
rs.MoveNext
%>
<td width=\"50%\" height=\"129\">
    <table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"2\" bgcolor=\"#CCCCCC\" height=\"100%\">
        <tr>
          <td colspan=\"2\" height=\"16\"> <b>
            <% Response.Write rs(\"varebeskrivelse\")%>
            </b> </td>
          <td rowspan=\"3\" width=\"36%\"><img src=\"../Images/produktbilleder/blomst.jpg\"></td>
        </tr>
        <tr>
          <td height=\"101\" colspan=\"2\" valign=\"top\">
            <% Response.Write rs(\"Stor_beskrivelse\")%>
          </td>
        </tr>
        <tr>
          <td width=\"31%\" valign=\"bottom\">Varenr.<b>
            <% Response.Write rs(\"varenr\")%>
            </b> </td>
          <td width=\"33%\" valign=\"bottom\">
            <div align=\"right\">DKK.&nbsp;<b>
              <% Response.Write formatnumber(rs(\"udsalgspris_incl_moms\"),2)%>
              </b> </div>
          </td>
        </tr>
      </table>
      <%
end if
end if
end if
%>
</table>
<%

myConn.Close
Set myConn = Nothing
%>
Avatar billede nute Nybegynder
18. december 2001 - 18:32 #1
et tips:

lær deg å benytte loops !! du har 3 ganger så mye kode som du behøver for å skrive ut det du ønsker.
Avatar billede medions Nybegynder
18. december 2001 - 18:36 #2
er der ikke angivet et sted (linje nr) hvor fejlen er opstået?
Avatar billede mekaniker Nybegynder
18. december 2001 - 18:52 #3
Hej nute
Jeg har siddet og læst omkring dette med kolonner på eksperten, der er en del som omhandler dette men jeg kan ikke rigtig finde nogen løsning.
Hvordan laver man dette med loop. Det skulle gerne laves med 2 kolonner.
Jeg kan godt lave det med et loop, hvis jeg laver en rs.movenext 1 gang også laver loopet.
Men dette holder ikke hvis der kun er 3 records.
Avatar billede mekaniker Nybegynder
18. december 2001 - 19:07 #4
jeg vil gerne smide nogle flere point i hvis du gider hjælpe mig.

//mekaniker
Avatar billede nute Nybegynder
18. december 2001 - 21:07 #5
sånn som du har skrevet det nå, så er du jo hele tiden nødt til å vite hvor mange records du har i databasen og kode etter det. så er plutselig fordelen med ASP fullstendig borte. Du skal gjøre følgende:

1) Skrive ut alle records i ditt recordset
2) For hvert andre record skal du lage en ny kolonne.

Hvis du skriver problemstillingen på denne måte så er det rimelig enkelt å overskue problemet samt få en løsning på det:

Det er ingen problem i å løpe igjennom alle records i et recordset. Det er nok den mest normale operasjon når man arbeider med ASP, så punkt 1) er ikke noe problem.

punkt 2) derimot...hvordan skal man kunne holde styr på annethvert record ? på samme måte som man ville gjort ute i virkeligheten: å telle...vi skal opprette en teller...en som kkun trenger å kunne telle til 2.

En hurtig kode kan skissere hva vi ønsker:

SQL = \"SELECT noe FRA enTabell\"
RS = vårt recordset
teller = 1

while( NOT RS.EOF )
  skriv ut noe data
  if( teller = 2 ) then
    ny rekke
    nullstill teller
  else
    iterer teller
  end if
wend

skriv ut resterende kolonner for at tabellen skal være fullendt


det er det hele...så skal man bare sette dette sammen med din kode...

<%
Set myConn = Server.CreateObject(\"ADODB.Connection\")
  myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"& Server.MapPath(\"../db/varer.mdb\")

  strSQL = \"SELECT * FROM Annonce \"
  set rs = myconn.execute(strSQL)

\'Response.write \"<td rowspan=\"\"2\"\"><img src=\"\"\"& Billede &\"\"\"></td></tr>\"

%>
<table width=\"95%\" border=\"2\" cellspacing=\"4\" cellpadding=\"0\" height=\"145\" bordercolor=\"#003366\" align=\"center\">
<tr>
<%
teller = 1
while( NOT rs.EOF )
  %>
  <td width=\"50%\" height=\"129\">
    <table width=\"100%\" border=\"1\" cellspacing=\"0\" cellpadding=\"2\" bgcolor=\"#CCCCCC\" height=\"100%\">
      <tr>
        <td colspan=\"2\" height=\"16\"> <b>
          <% Response.Write rs(\"varebeskrivelse\")%>
          </b> </td>
        <td rowspan=\"3\" width=\"36%\"><img src=\"../Images/produktbilleder/blomst.jpg\"></td>
      </tr>
      <tr>
        <td height=\"101\" colspan=\"2\" valign=\"top\">
          <% Response.Write rs(\"Stor_beskrivelse\")%>
        </td>
      </tr>
      <tr>
        <td width=\"31%\" valign=\"bottom\">Varenr.<b>
          <% Response.Write rs(\"varenr\")%>
          </b> </td>
        <td width=\"33%\" valign=\"bottom\">
          <div align=\"right\">DKK.&nbsp;<b>
            <% Response.Write formatnumber(rs(\"udsalgspris_incl_moms\"),2)%>
            </b> </div>
        </td>
      </tr>
    </table>
    </td>
    <%
    if( teller = 2 ) then
      response.write \"</tr><tr>\"
        teller = 1
    else
    teller = teller + 1
    end if
    rs.MoveNext
wend

while( teller < 2 )
  response.write \"<td>&nbsp;</td>\"
wend
%>
</tr>
</table>

/nute
Avatar billede mekaniker Nybegynder
18. december 2001 - 22:43 #6
Hej Nute
Jeg når ikke lige at kikke på det idag, men jeg skal nok vende tilbage.
på forhand mange tak for hjælpen

//Mekaniker
Avatar billede mekaniker Nybegynder
20. december 2001 - 10:50 #7
Hej Nute
Mange tak for hjælpen, og den udførlige beskrivelse

//Mekaniker
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