Vad för fel??

ASP

2 svar · 94 visningar · startad av jwradhe 1 sep. 2002

jwradheMedlem sedan juni 2002711 inlägg

Frågan1 sep. 2002 12:54#1

Får detta fel :

ADODB.Recordset error '800a0e78'

Operation is not allowed when the object is closed.

/jimmyw/inlagg.asp, line 27

och här e koden.

<!-- #include file="settings.asp" -->
<!-- #include file="adovbs.inc" -->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#CCCCCC" text="#000000">
<div align="center">
  <%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
SQL = "SELECT * From inlagg order by ID desc"

Set RecSet = Server.CreateObject("ADODB.Recordset")
%>
  <br>
  <table style="border-top: #000000 1px solid;border-bottom: #000000 1px solid;border-left: #000000 1px solid;border-right: #000000 1px solid;" width="450" border="0" cellspacing="0" cellpadding="0">
    <tr> 
      <td align="center" valign="top">
<table width="440" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td> 
              <p><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><b><font size="2">G&auml;stbok<br>
                </font></b></font> 
                <% do until recset.EOF %>
              </p>
              <hr size="1">
              <font face="Verdana, Arial, Helvetica, sans-serif" size="1"><%=RecSet("amne")%> 
              - <%=RecSet("IP")%> <br>
              <%=RecSet("meddelande")%> <br>
              <br>
              Skrivet av: <a href="mailto:<%=RecSet("email")%>"><%=RecSet("namn")%></a> 
              - 
              <%If RecSet("hemsida") <> "" Then%>
              <a href="<%=RecSet("hemsida")%>">Hemsida</a> 
              <%End If%>
              <br>
              Svar: 
              <%If RecSet("svar") <> "" Then%>
              <%=RecSet("svar")%> 
              <%else %>
              Inget svar på denna fråga ännu. 
              <%End If%>
              </font> <br>
             
 <% 
RecSet.MoveNext   
Loop                       

RecSet.Close
Connect.Close 
Set RecSet = nothing
Set Connect = nothing
%>

<br>
              <hr size="1">
            
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
</div>
</body>
</html>

vad är fel???

OveRRidEMedlem sedan feb. 200112 078 inlägg

1 sep. 2002 13:00#2

<!-- #include file="settings.asp" -->
<!-- #include file="adovbs.inc" -->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#CCCCCC" text="#000000">
<div align="center">
  <%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
SQL = "SELECT * From inlagg order by ID desc"
'Ny rad
[b][red]Set RecSet = connect.execute(SQL)[/red][/b]
%>
  <br>
  <table style="border-top: #000000 1px solid;border-bottom: #000000 1px solid;border-left: #000000 1px solid;border-right: #000000 1px solid;" width="450" border="0" cellspacing="0" cellpadding="0">
    <tr> 
      <td align="center" valign="top">
<table width="440" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td> 
              <p><font face="Verdana, Arial, Helvetica, sans-serif" size="1"><b><font size="2">Gästbok<br>
                </font></b></font> 
                <% do until recset.EOF %>
              </p>
              <hr size="1">
              <font face="Verdana, Arial, Helvetica, sans-serif" size="1"><%=RecSet("amne")%> 
              - <%=RecSet("IP")%> <br>
              <%=RecSet("meddelande")%> <br>
              <br>
              Skrivet av: <a href="mailto:<%=RecSet("email")%>"><%=RecSet("namn")%></a> 
              - 
              <%If RecSet("hemsida") <> "" Then%>
              <a href="<%=RecSet("hemsida")%>">Hemsida</a> 
              <%End If%>
              <br>
              Svar: 
              <%If RecSet("svar") <> "" Then%>
              <%=RecSet("svar")%> 
              <%else %>
              Inget svar på denna fråga ännu. 
              <%End If%>
              </font> <br>
             
 <% 
RecSet.MoveNext   
Loop                       

RecSet.Close
Connect.Close 
Set RecSet = nothing
Set Connect = nothing
%>

<br>
              <hr size="1">
            
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
</div>
</body>
</html>

Du kör aldrig SQL-kommandot.

jwradheMedlem sedan juni 2002711 inlägg

1 sep. 2002 13:05#3

tack så mycket för hjälpen!!!

tack tack tack!!!!