Ja, koden er her:
<!--#Include File="Connections/db.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
<link REL="Stylesheet" HREF="sider/theme.css" TYPE="text/css">
</head>
<body>
<% If Request.Form("submit") = "Tilmeld" Then %>
<%
Set indlaeg = Server.CreateObject("ADODB.Recordset")
sql = "shjagt_nyhedsbrev"
indlaeg.Open sql, MM_db_STRING, 1, 2
indlaeg.AddNew
indlaeg("navn") = Request.Form("navn")
indlaeg("email") = Request.Form("email")
indlaeg.Update
indlaeg.close
set indlaeg = Nothing
Response.Write("Du er nu tilmeldt SH-Jagt's nyhedsbrev.")
%>
<% ElseIf Request.Form("submit") = "Frameld" Then %>
<%
Set indlaeg = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM shjagt_nyhedsbrev WHERE email= " & Request.Form("email")
indlaeg.Open sql, MM_db_STRING, 1, 2
indlaeg.delete
indlaeg.close
set indlaeg = Nothing
Response.Write("Du er nu frameldt SH-Jagt's nyhedsbrev.")
%>
<% Else %>
<% Response.Redirect("sider/forside.asp") %>
<% End If %>
</body>
</html>
Der er under frameldings delen det går galt.