24. marts 2002 - 00:54
Der er
19 kommentarer og 1 løsning
Lukkefejl ??
Jeg får denne fejl, og aner ikke hvad det er. Er der nogle der kan finde fejlen?? Dette er fejlen: ADODB.Recordset fejl '800a0e78' Den handling, programmet anmodede om, er ikke tilladt, hvis objektet er lukket. /dvdit/dvdit-filer/nyhedsbrev/frameld.asp, linje 27 Her er scriptet: <%@ Language=VBScript %> <%option explicit%> <!--#include file ="SpawnedHead.asp"--> <% Dim email,conn,rsMail email = Request.Form("eaddy") response.write( email ) if email = "" then response.write("Gå venligst tilbage og skriv din e-mail adresse som du vil slette.") else If InStr(1,email,"@",vbTextCompare) = 0 then response.write(" Dette er ikke en korrekt e-mail adresse, prøv venligst igen!") else set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("../../db/SpawnedMailer.mdb")) set rsMail = Server.CreateObject("ADODB.recordset") rsMail.Open "DELETE FROM MailingList WHERE MailingAddy='" & email & "'", conn If rsMail.EOF Then Response.Write "Din e-mail findes ikke!" else Response.Write "Du er nu frameldt nyhedsbrevet!" rsMail.close conn.close end if end if end if %> <!--#include file ="SpawnedFoot.asp"-->
Annonceindlæg fra Computerworld
24. marts 2002 - 01:33
#1
En delete returnerer ikke et recordset. Du skal bare udføre en conn.Exeute "DELETE..." ja, det vil sige - det tror jeg nok det hedder. Jeg er ikke så stiv i det her gammeldags ASP..
24. marts 2002 - 01:50
#2
Men jeg er vist mindre stiv i det end du er:) Vil du ikke lige prøve at rette i mit script, for jeg har lige prøvet med Exeute, men det dur ikke lige for mig !!
24. marts 2002 - 01:52
#3
Er det noget jeg - eller mit tastatur - er endnu mindre stiv til, så er det nok at stave conn.Execute "DELETE..."
24. marts 2002 - 02:01
#4
Ja, jeg kan godt se at det hjælper at stave rigtigt:) Men lige meget hvad jeg gør, så er der en eller anden fejl, - så vil du ikke lige prøve at sætte det ind for mig??
24. marts 2002 - 02:07
#5
Jeg kan som sagt ikke finde ud af det der ASP-halløj. Prøv at vise hvad du har.
24. marts 2002 - 02:20
#6
Hvad mener du? Det jeg har er det som står for oven!!
24. marts 2002 - 02:21
#7
Vel ikke efter du har rettet til noget med ...execute...
24. marts 2002 - 02:26
#8
Når på den måde !! Det eneste jeg har ændret er bare at bytte: rsMail.Open "DELETE FROM MailingList WHERE MailingAddy='" & email & "'", conn til conn.Exeute "DELETE "DELETE FROM MailingList WHERE MailingAddy='" & email & "'", conn
24. marts 2002 - 02:27
#9
Så du spørger stadig på din rsmail - det dutter jo ikke
24. marts 2002 - 02:28
#10
Og så mener du ikke conn.Exeute "DELETE "DELETE FROM MailingList WHERE MailingAddy='" & email & "'", conn vel ?? Du har jo conn.Exeute "DELETE FROM MailingList WHERE MailingAddy='" & email & "'" ikke sandt ?
24. marts 2002 - 02:31
#11
conn.Execute "DELETE FROM MailingList WHERE MailingAddy='" & email & "'" Og så siger du "en eller anden fejl" - tror du ikke vi kunne komme længere hvis du fortæller hvad fejlen er?
24. marts 2002 - 02:35
#12
Nu har jeg sat det ind så der står: set rsMail = Server.CreateObject("ADODB.recordset") conn.Execute "DELETE FROM MailingList WHERE MailingAddy='" & email & "'" If rsMail.EOF Then Response.Write "Din e-mail findes ikke i vores kardotek !" Men der er stadig fejlmelding der siger: Den handling, programmet anmodede om, er ikke tilladt, hvis objektet er lukket. /dvdit/dvdit-filer/nyhedsbrev/frameld.asp, linje 27
24. marts 2002 - 02:36
#13
Hvad finken laver det rsmail-halløj her - det kan du ikke bruge. Det kommer jo ikke et recordsæt ud af en delete.
24. marts 2002 - 02:41
#14
Hvad skal jeg så skrive??
24. marts 2002 - 02:44
#15
Du skal ikke skrive, du skal fjerne alt der har med din rsmail at gøre
24. marts 2002 - 02:50
#16
sådan her... <%@ Language=VBScript %> <%option explicit%> <!--#include file ="SpawnedHead.asp"--> <% Dim email,conn,rsMail email = Request.Form("eaddy") response.write( email ) if email = "" then response.write("Gå venligst tilbage og skriv din e-mail adresse som du vil slette.") else If InStr(1,email,"@",vbTextCompare) = 0 then response.write(" Dette er ikke en korrekt e-mail adresse, prøv venligst igen!") else set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("../../db/SpawnedMailer.mdb")) conn.Execute("DELETE FROM MailingList WHERE MailingAddy='" & email & "'") response.write "Du er nu afmeldt nyhedsbrevet...." conn.close end if end if %> <!--#include file ="SpawnedFoot.asp"--> --xs
25. marts 2002 - 12:12
#17
Tak for det, det var lige hvad jeg havde brug for!
25. marts 2002 - 12:12
#18
Kan jeg få et svar? - så jeg kan give nogle point?
25. marts 2002 - 12:16
#19
det må være dine point eric...
25. marts 2002 - 13:53
#20
Ja det må I jo om ?
Kurser inden for grundlæggende programmering