Avatar billede bobbedude Nybegynder
15. november 2001 - 15:56 Der er 18 kommentarer og
2 løsninger

underlig fejle ?

det er engtlig ret enkelt jeg sender et link som dette opretsleeves.asp?linkid=6 til denne form:

<%
response.buffer = true
set connect = server.createobject(\"ADODB.Connection\")
Connect.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"sleevs.mdb\")

strSQL = \"SELECT * FROM kategorier WHERE katid LIKE \'\" & request(\"linkid\") & \"\'\"
set rs = Connect.Execute(strSQL)

%>
<html>
<head>
<title>Opret sleeves</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
<link rel=\"stylesheet\" href=\"tekst.css\" type=\"text/css\">
</head>

<body bgcolor=\"#000000\" text=\"#FFFFFF\" link=\"#FFCC00\" vlink=\"#FFCC00\" alink=\"#FFCC00\">
<p class=\"storskrift\">&nbsp;</p>
<table border=\"0\" align=\"center\" width=\"700\">
  <tr valign=\"middle\" align=\"center\">
    <td class=\"links\">Opret sleeves</td>
  </tr>
  <tr valign=\"middle\" align=\"center\">
    <td class=\"links\">&nbsp;</td>
  </tr>
  <tr valign=\"middle\" align=\"center\">
    <td>
      <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#666666\" class=\"linksIndhold\">&nbsp;</td>
          <td width=\"10\">&nbsp;</td>
        </tr>
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#FFFFFF\">
<form name=\"opretsleeves\" method=\"post\" action=\"opretsleeves.asp?opret=sleeves\">
              <table width=\"650\" border=\"1\" align=\"center\" class=\"almskriftblack\">
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
                <tr>
                  <td>Overskrift:</td>
                  <td>
                    <input type=\"text\" name=\"overskrift\">
                  </td>
                </tr>
                <tr>
                  <td class=\"almskriftblack\">Notat:</td>
                  <td>
                    <textarea name=\"notat\"></textarea>
                  </td>
                </tr>
                <tr>
                  <td>Oprettet dato:</td>
                  <td><%=FormatDateTime(Date, 2)%></td>
                </tr>
                <tr>
                  <td>Oprettet af:</td>
                  <td>
                    <input type=\"text\" name=\"oprettetaf\">
                  </td>
                </tr>
                <tr>
                  <td>
                    <input type=\"hidden\" name=\"kategori\" value=\"<%=rs(\"katid\")%>\">
                    <input type=\"hidden\" name=\"dato\" value=\"<%=FormatDateTime(Date, 2)%>\">
                  </td>
                  <td>
                    <input type=\"submit\" name=\"Submit\" value=\"Opret sleeves\">
                  </td>
                </tr>
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
              </table>
</form>
          </td>
          <td width=\"10\">&nbsp;</td>
        </tr>
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#666666\" align=\"center\" valign=\"middle\" class=\"almskrift\">Reprocentret
            &copy; </td>
          <td width=\"10\">&nbsp;</td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<%
select case request(\"opret\")

\'Opret sleeves
case \"sleeves\"



connect.execute(\"INSERT INTO sleevs (overskrift,notat,oprettetaf,kategori,dato) VALUES(\'\" & request.form(\"overskrift\") & \"\',\'\" & request.form(\"notat\") & \"\',\'\" & request.form(\"oprettetaf\") & \"\',\'\" & request.form(\"kategori\") & \"\',\'\" & request.form(\"dato\") & \"\')\")

response.redirect \"sleevs.asp?mode=bestilt\"

end select
%>

</body>
</html>

Når jeg så trykker på opret sleeves så får jeg denne fejl:

ADODB.Field error \'80020009\'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/jimmyrogers/opretsleeves.asp, line 0


Hvad er det der går galt ???
Avatar billede avlund Nybegynder
15. november 2001 - 15:56 #1
Den loader ikke recordsettet.
Avatar billede bobbedude Nybegynder
15. november 2001 - 15:58 #2
Hvad vil det sige :ø)?
Avatar billede avlund Nybegynder
15. november 2001 - 15:58 #3
set connect = server.createobject(\"ADODB.Connection\")
Connect.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"sleevs.mdb\")

strSQL = \"SELECT * FROM kategorier WHERE katid LIKE \'\" & request(\"linkid\") & \"\'\"
set rs = Connect.Execute(strSQL)

Her er din fejl.
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:00 #4
Ok men hvad kan jeg gøre ? ( undskyld jeg er lidt tung i det )
Avatar billede avlund Nybegynder
15. november 2001 - 16:01 #5
Du åbner en connection, men definerer det som recordset.

Skriv i stedet:

set rs = server.createobject(\"ADODB.Recordset\")
rs.Open strSQL, connect
Avatar billede avlund Nybegynder
15. november 2001 - 16:01 #6
Det er OK... jeg delte bare lige mit svar lidt op.
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:06 #7
Jeg tror jeg ved hvad du mener men jeg kan ikke få det til at virke :ø(
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:08 #8
jeg prøvede dette men det vil ik:


response.buffer = true
set rs = server.createobject(\"ADODB.Connection\")
Connect.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"sleevs.mdb\")

strSQL = \"SELECT * FROM kategorier WHERE katid LIKE \'\" & request(\"linkid\") & \"\'\"
set rs = Connect.Execute(strSQL)
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:11 #9
Og dette virker heller ikke:


<%
response.buffer = true
set rs = server.createobject(\"ADODB.Recordset\")
rs.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"sleevs.mdb\")

strSQL = \"SELECT * FROM kategorier WHERE katid LIKE \'\" & request(\"linkid\") & \"\'\"
Connect.Execute(strSQL)

%>
Avatar billede netsrac Praktikant
15. november 2001 - 16:11 #10
Der er ingen record der passer på din sql sætning, gør sådan her:

<%
response.buffer = true
set connect = server.createobject(\"ADODB.Connection\")
Connect.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"sleevs.mdb\")

strSQL = \"SELECT * FROM kategorier WHERE katid LIKE \'\" & request(\"linkid\") & \"\'\"
set rs = Connect.Execute(strSQL)
if not rs.eof Then
%>
<html>
<head>
<title>Opret sleeves</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
<link rel=\"stylesheet\" href=\"tekst.css\" type=\"text/css\">
</head>

<body bgcolor=\"#000000\" text=\"#FFFFFF\" link=\"#FFCC00\" vlink=\"#FFCC00\" alink=\"#FFCC00\">
<p class=\"storskrift\">&nbsp;</p>
<table border=\"0\" align=\"center\" width=\"700\">
  <tr valign=\"middle\" align=\"center\">
    <td class=\"links\">Opret sleeves</td>
  </tr>
  <tr valign=\"middle\" align=\"center\">
    <td class=\"links\">&nbsp;</td>
  </tr>
  <tr valign=\"middle\" align=\"center\">
    <td>
      <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#666666\" class=\"linksIndhold\">&nbsp;</td>
          <td width=\"10\">&nbsp;</td>
        </tr>
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#FFFFFF\">
<form name=\"opretsleeves\" method=\"post\" action=\"opretsleeves.asp?opret=sleeves\">
              <table width=\"650\" border=\"1\" align=\"center\" class=\"almskriftblack\">
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
                <tr>
                  <td>Overskrift:</td>
                  <td>
                    <input type=\"text\" name=\"overskrift\">
                  </td>
                </tr>
                <tr>
                  <td class=\"almskriftblack\">Notat:</td>
                  <td>
                    <textarea name=\"notat\"></textarea>
                  </td>
                </tr>
                <tr>
                  <td>Oprettet dato:</td>
                  <td><%=FormatDateTime(Date, 2)%></td>
                </tr>
                <tr>
                  <td>Oprettet af:</td>
                  <td>
                    <input type=\"text\" name=\"oprettetaf\">
                  </td>
                </tr>
                <tr>
                  <td>
                    <input type=\"hidden\" name=\"kategori\" value=\"<%=rs(\"katid\")%>\">
                    <input type=\"hidden\" name=\"dato\" value=\"<%=FormatDateTime(Date, 2)%>\">
                  </td>
                  <td>
                    <input type=\"submit\" name=\"Submit\" value=\"Opret sleeves\">
                  </td>
                </tr>
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
              </table>
</form>
          </td>
          <td width=\"10\">&nbsp;</td>
        </tr>
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#666666\" align=\"center\" valign=\"middle\" class=\"almskrift\">Reprocentret
            &copy; </td>
          <td width=\"10\">&nbsp;</td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<%
select case request(\"opret\")

\'Opret sleeves
case \"sleeves\"



connect.execute(\"INSERT INTO sleevs (overskrift,notat,oprettetaf,kategori,dato) VALUES(\'\" & request.form(\"overskrift\") & \"\',\'\" & request.form(\"notat\") & \"\',\'\" & request.form(\"oprettetaf\") & \"\',\'\" & request.form(\"kategori\") & \"\',\'\" & request.form(\"dato\") & \"\')\")

response.redirect \"sleevs.asp?mode=bestilt\"

end select

Else
Response.write(\"kategorien findes ikke\")
End if
%>

</body>
</html>
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:15 #11
hehe ok det der går galt er at når opretsleeves?linkid=6 så skal det 6 tal bare sættes ind i feltet kategori den skal ikke checke om det er der for det er det ikke, kategorierne kommer fra tabellen ( kategorier ) og linkene kommer fra tabellen ( sleevs )
Avatar billede netsrac Praktikant
15. november 2001 - 16:18 #12
Okay, har du så fundet ud af det ?
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:25 #13
hehe nop
jeg ville bare have den til at indsætte info fra formen ind i tabellen sleevs, men den bliver ved med at sige at der er en fejl.
Avatar billede avlund Nybegynder
15. november 2001 - 16:35 #14
Du skriver \"sleeves\" med det sidste \"e\" nogle gange og andre gange uden, kan det ikke være det?
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:37 #15
Nej det er ikke det.
Avatar billede netsrac Praktikant
15. november 2001 - 16:42 #16
Det giver jo ingen mening, det du siger, er det det her du leder efter:

<%
response.buffer = true
set connect = server.createobject(\"ADODB.Connection\")
Connect.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"sleevs.mdb\")

%>
<html>
<head>
<title>Opret sleeves</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
<link rel=\"stylesheet\" href=\"tekst.css\" type=\"text/css\">
</head>

<body bgcolor=\"#000000\" text=\"#FFFFFF\" link=\"#FFCC00\" vlink=\"#FFCC00\" alink=\"#FFCC00\">
<p class=\"storskrift\">&nbsp;</p>
<table border=\"0\" align=\"center\" width=\"700\">
  <tr valign=\"middle\" align=\"center\">
    <td class=\"links\">Opret sleeves</td>
  </tr>
  <tr valign=\"middle\" align=\"center\">
    <td class=\"links\">&nbsp;</td>
  </tr>
  <tr valign=\"middle\" align=\"center\">
    <td>
      <table width=\"700\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#666666\" class=\"linksIndhold\">&nbsp;</td>
          <td width=\"10\">&nbsp;</td>
        </tr>
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#FFFFFF\">
<form name=\"opretsleeves\" method=\"post\" action=\"opretsleeves.asp?opret=sleeves\">
              <table width=\"650\" border=\"1\" align=\"center\" class=\"almskriftblack\">
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
                <tr>
                  <td>Overskrift:</td>
                  <td>
                    <input type=\"text\" name=\"overskrift\">
                  </td>
                </tr>
                <tr>
                  <td class=\"almskriftblack\">Notat:</td>
                  <td>
                    <textarea name=\"notat\"></textarea>
                  </td>
                </tr>
                <tr>
                  <td>Oprettet dato:</td>
                  <td><%=FormatDateTime(Date, 2)%></td>
                </tr>
                <tr>
                  <td>Oprettet af:</td>
                  <td>
                    <input type=\"text\" name=\"oprettetaf\">
                  </td>
                </tr>
                <tr>
                  <td>
                    <input type=\"hidden\" name=\"kategori\" value=\"<%=request(\"linkid\")%>\">
                    <input type=\"hidden\" name=\"dato\" value=\"<%=FormatDateTime(Date, 2)%>\">
                  </td>
                  <td>
                    <input type=\"submit\" name=\"Submit\" value=\"Opret sleeves\">
                  </td>
                </tr>
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
                <tr>
                  <td colspan=\"2\">&nbsp;</td>
                </tr>
              </table>
</form>
          </td>
          <td width=\"10\">&nbsp;</td>
        </tr>
        <tr>
          <td width=\"10\">&nbsp;</td>
          <td bgcolor=\"#666666\" align=\"center\" valign=\"middle\" class=\"almskrift\">Reprocentret
            &copy; </td>
          <td width=\"10\">&nbsp;</td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<%
select case request(\"opret\")

\'Opret sleeves
case \"sleeves\"



connect.execute(\"INSERT INTO sleevs (overskrift,notat,oprettetaf,kategori,dato) VALUES(\'\" & request.form(\"overskrift\") & \"\',\'\" & request.form(\"notat\") & \"\',\'\" & request.form(\"oprettetaf\") & \"\',\'\" & request.form(\"kategori\") & \"\',\'\" & request.form(\"dato\") & \"\')\")

response.redirect \"sleevs.asp?mode=bestilt\"

end select

%>

</body>
</html>
Avatar billede avlund Nybegynder
15. november 2001 - 16:44 #17
OK.

Prøv udelukkelsesmetoden. Forsøg først at sætte apostrof (\') ud for din connect.execute(\"INSERT... statement og se om den så vil godtage den.
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:47 #18
netsrac  >> Lige netop jeg undskylder tusind gange for min roede forklaring.
Sagen er den at jeg stadig er ret ny med ASP og det er sgu ret svært at forklarer lige hvad det er man gerne vil have, håber i bærer over med mig.
ps jeg har delt point lidt håber det er ok.
MANGE TAK FOR HJÆLPEN.
Avatar billede avlund Nybegynder
15. november 2001 - 16:49 #19
Tjaeh, for min skyld gerne. Takker.

Så i droppede simpelthen bare SELECT helt?
Avatar billede bobbedude Nybegynder
15. november 2001 - 16:51 #20
Jeg kagede rundt i den select fordi jeg ikke vidste at jeg bare kunne bruge

<%=request(\"linkid\")%>

for at få linkid skrevet ud.
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