---
title: "Radera Ur databas?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/9859-radera-ur-databas"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "freddssite"
published: "2001-06-03T19:43:00.000Z"
updated: "2001-06-03T19:47:00.000Z"
replies: 1
views: 185
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/9859-radera-ur-databas"
---

# Radera Ur databas?

## #1 — freddssite, 2001-06-03T19:43Z

vad skall jag ändra för att det skall fungera?

\<%
	
	Set Connect = Server.CreateObject("ADODB.Connection")
	Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("db/mail.mdb")
	Set RecSet = Server.CreateObject("ADODB.Recordset")

	AdGbook = "SELECT \* FROM mail"

	RecSet.Open AdGbook, Connect, adOpenDynamic, adLockOptimistic
	
	%\>

 	\<% if Request.Form("mail") = RecSet("mail") then %\>
	\<% if Request.Form("psw") = RecSet("psw") then %\> 

\<%
	RecSet.Delete
	RecSet.Close %\>

Permalänk: https://www.webforum.nu/p/9859

## #2 — Vide, 2001-06-03T19:47Z

Det där är inte hela koden va?

Testa detta:

```
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/mail.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")

AdGbook = "SELECT * FROM mail Where mail = '"&Request.Form("mail")&"' AND psw = '"&Request.Form("psw")&"'"

RecSet.Open AdGbook, Connect

If NOT RecSet.EOF then
RecSet.Delete
RecSet.Close
Else
Response.Write "Användaren fanns inte..."
End If
%>
```

Permalänk: https://www.webforum.nu/p/270816

---

Tråden på webben: https://www.webforum.nu/amne/asp/9859-radera-ur-databas