Toon posts:

[ASP] wat doe ik fout

Pagina: 1
Acties:
  • 42 views sinds 30-01-2008

Verwijderd

Topicstarter
Voor een gastenboek heb ik een stukje code geschreven wat inschrijvingen kanm verwijderen.
Door middel van een button onder de inschrijving.
De code werkt perfect op 1 ding na; na het uitvoeren van de code krijg ik een foutmelding op het scherm:

De code haalt dus wel de inschrijving eruit maar daarna wil ik die foutmelding eruit hebben.

Technische informatie (voor ondersteunend personeel)

Soort fout:
ADODB.Recordset (0x800A0E78)
De bewerking is niet toegestaan als het object gesloten is.
blablabla/delete.asp, line 33


Soort browser:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)

Pagina:
POST 0 bytes naar blabla/delete.asp

POST Data:


Tijd:
woensdag 4 augustus 2004, 20:51:59


Meer gegevens:
Microsoft Support

Dit is de code:

<!--#include file=adovbs.inc-->
<%
action = ""&Request ("action")
Response.Write action

Dim objConn, strQuery, objRs
' Set up a data connection for later queries
Set objConn = Server.CreateObject("ADODB.Connection")
' This is the path to the Access database
'objConn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=blabla\guestbook.mdb;Jet OLEDB:Database;"
objConn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=blabla\guestbook.mdb;Jet OLEDB:Database;"
'Build the query depents on action
if action <> "" then
strQuery = "DELETE * FROM guestbook WHERE ID = "&action
'Execute the query
Set objRs = objConn.Execute(strQuery)
'Response.Redirect("delete.asp")
end if
if action = "" then
strQuery = "SELECT * FROM guestbook ORDER BY Post_Date DESC, Post_time DESC"
end if
'Execute the query
Set objRs = objConn.Execute(strQuery)


%>
<html>
<head>
<title>Opmerkingen verwijderen uit het gastenboek</title>
</head>
<body BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#0000FF" VLINK="#800080">
<!--No data return-->
<% If objRs.BOF And objRs.EOF Then %> !!!!!! DIT IS REGEL 33
<tr BGCOLOR="#FFFFFF">
<td ALIGN="center">
Het Gastenboek is leeg
<% Else %>
<!--Display the result-->
<% Do Until objRs.EOF %>
<form action="delete.asp?action=<%Response.Write objRS("ID")%>" method="post">
ID: <%Response.Write objRS("ID")%><br>
Datum:&nbsp<% Response.Write objRs("Post_Date")%><br>
Tijd:  <% Response.Write objRs("Post_Time")%><br>
Naam: <% Response.Write objRs("Name")%><br>
E-mail: <% Response.Write objRs("E_Mail_Address")%><br>
Woonplaats: <% Response.Write objRs("Org_Name")%><br>
Opmerking: <% Response.Write objRs("Comment")%><br>
<input TYPE="Submit" VALUE="verwijder">
</form>
<hr>
<% objRs.MoveNext %>
<% Loop %>
<% End If %>

<!--Close the data connection-->
<% objRs.Close %>
<% Set objRs = Nothing %>
<% objConn.Close %>
<% Set objConn = Nothing %>

</body>
</html>

  • IWriteCode
  • Registratie: Juli 2000
  • Laatst online: 21-05 13:54

IWriteCode

Less = more

Zet het ff tussen code tags... dat is wel makkelijk ivm regelnummers...

code:
1
If objRs.BOF And objRs.EOF Then


Ik zou er zowiezo
code:
1
If objRs.BOF Or objRs.EOF Then
van maken... iets kan niet en BOF en EOF zijn (Begin of File End of File)

[ Voor 57% gewijzigd door IWriteCode op 04-08-2004 21:07 ]

Less = more


  • NMe
  • Registratie: Februari 2004
  • Laatst online: 19-05 21:24

NMe

Quia Ego Sic Dico.

Ik heb je code niet doorgelezen, leest te lastig, gebruik liever [code] tags. Maar het is heel simpel, je probeert waarschijnlijk een query te doen op een gesloten database, of je haalt wat op uit een gesloten recordset. :P

'E's fighting in there!' he stuttered, grabbing the captain's arm.
'All by himself?' said the captain.
'No, with everyone!' shouted Nobby, hopping from one foot to the other.


  • gorgi_19
  • Registratie: Mei 2002
  • Nu online

gorgi_19

Kruimeltjes zijn weer op :9

In de PW-FAQ staat een gedeelte over debuggen voor ASP-pagina's. Onder andere staat er in dat je moet zoeken naar de Engelse variant van je foutmelding.

Daarnaast zie je hierboven al: niemand neemt de moeite om een enorme lap code door te nemen, terwijl het grotendeels onnodig is om deze te posten. Daarnaast mis ik een stukje zelfwerkzaamheid om jouw probleem op te lossen; wat heb je zelf geprobeerd, heb je het probleem geisoleerd en wat zegt Google?

Verder is een titel als "wat doe ik fout" compleet nietszeggend over de inhoud van je topic. :) Een titel is een zeer beknopte samenvatting van je probleem, iets wat in jouw titel niet naar voren komt.

Zie ook P&W FAQ - De "quickstart" voor wat we verwachten van een topic.

[ Voor 16% gewijzigd door gorgi_19 op 04-08-2004 21:11 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo


Dit topic is gesloten.