Avatar billede tjensen Nybegynder
14. april 2003 - 23:28 Der er 4 kommentarer og
1 løsning

Unsubscrip funktion.!.

Hej Eksperter ;)

Jeg mangler en unsubscrip funktion til min mailing list. For at tilmelde sig ser det sådan ud:

<%@LANGUAGE="VBSCRIPT"%>

<%
If Request.QueryString("Submit") <> "" Then
%>
<!--#include file="forbindelse.asp" -->
<%
Set mailadr = Server.CreateObject("ADODB.Recordset")
mailadr.Open "mailingliste", database, 2, 2

mailadr.AddNew
    mailadr("email") = Request.QueryString("email")   
mailadr.Update

End If
%>

<html>
<head>
<title>Mailingliste</title>
</head>
<body bgcolor="#FFFFFF">

<form name="form1" method="get" action="mailingliste.asp">
<% If Request.QueryString("Submit") <> "" Then Response.Write("Du er tilføjet mailinglisten og vil modtage en email, når der er nyt!<br><br>")%>
  Email:
  <input type="text" name="email">
  <br>
  <input type="submit" name="Submit" value="Opret">
</form>

</body>
</html>

Og underligt nok er det bare ikke lykkes mig af fatte, at lave den modsatte side. Kunne I hjælpe mig lidt?
Avatar billede eagleeye Praktikant
14. april 2003 - 23:45 #1
Du kan evt kalde filen for:  mailinglisteslet.asp


<%@LANGUAGE="VBSCRIPT"%>

<%
If Request.QueryString("Submit") <> "" Then
%>
<!--#include file="forbindelse.asp" -->
<%
Set mailadr = Server.CreateObject("ADODB.Recordset")
mailadr.Open "DELETE FROM mailingliste WHERE email = '" & Request.QueryString("email") & "'", database, 2, 2
mailadr.Close

End If
%>

<html>
<head>
<title>Mailingliste</title>
</head>
<body bgcolor="#FFFFFF">

<form name="form1" method="get" action="mailinglisteslet.asp">
<% If Request.QueryString("Submit") <> "" Then Response.Write("Du er slette fra mailinglisten og vil ikke længere modtage emails!<br><br>")%>
  Email:
  <input type="text" name="email">
  <br>
  <input type="submit" name="Submit" value="Slet">
</form>

</body>
</html>
Avatar billede tjensen Nybegynder
14. april 2003 - 23:47 #2
jeg tester lige, inden pointene går over ;)
Avatar billede tjensen Nybegynder
14. april 2003 - 23:50 #3
Error Type:
Følgende fejlmeddelses kom frem:

ADODB.Recordset (0x800A0E78)
Operation is not allowed when the object is closed.
/mailinglisteslet.asp, line 10
Avatar billede eagleeye Praktikant
14. april 2003 - 23:52 #4
Så prøv at fjerne denne linje:

mailadr.Close
Avatar billede tjensen Nybegynder
14. april 2003 - 23:55 #5
Jeg takker mange gange! Her er 20 velfortjente points ;)
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
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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