---
title: "Fel på kod?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10948-fel-på-kod"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "webzonen"
published: "2001-08-06T17:06:00.000Z"
updated: "2001-08-06T17:22:00.000Z"
replies: 3
views: 190
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/10948-fel-på-kod"
---

# Fel på kod?

## #1 — webzonen, 2001-08-06T17:06Z

Kan ni se vad som är felet på denna kod:

```
<% IF Session("admin") = "" THEN %>
Logga in för att komma åt administrationspanelen
<form method="post" action="default.asp?page=kolla">
Login: 
<input type="text" name="namn"> Lösenord: <input type="password" name="pass"> <input type="submit" value="skicka">
</form>
<% End If %> 
<% If Request.QueryString("page") = "kolla" Then %>
<%
Namn = Request.Form("namn")
Password = Request.Form("pass")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open = "driver={Microsoft Access Driver (*.mdb)};DBQ=c:\inetpub\wwwroot\webzonen\main\main.mdb"
SQL = "SELECT * From red WHERE Namn ='" & Namn & "'"
Set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open SQL, Conn
%>
<%
If Password = RS("Pass") Then 
Session("admin") = "OK"
Response.Write "Du har loggat in"
Else
Response.Write "fel lösenord, kolla igen"
End If
%>

<%
Conn.Close
Set RS=nothing 
RS.Close
%>
 

<%End If %>
```

Jag får meddelandet
Körningsfel i Microsoft VBScript fel '800a01b6' 

Objektet stöder inte egenskapen eller metoden.: 'Conn.Open' 

/webzonen/admin/default.asp, rad 18

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

## #2 — PatrikB, 2001-08-06T17:09Z

Själv ser jag inte att du har .Execute med ngnstans ... kanske e blind.

Det jag hakade upp mig på är dock detta:

```
<%
Conn.Close
Set RS=nothing 
RS.Close
%>
```

Bör vara:

```
<%
RS.Close
Set RS=nothing
Conn.Close
Set Conn = Nothing
%>
```

Först stänga och förstöra recset objektet, sedan stänga och förstöra conn-objektet.

cya,
PatrikB

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

## #3 — LarsG, 2001-08-06T17:19Z

Ta bort = från conn.open dvs

```
Conn.Open "driver={Microsoft Access Driver (*.mdb)};DBQ=c:\inetpub\wwwroot\webzonen\main\main.mdb"
```

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

## #4 — webzonen, 2001-08-06T17:22Z

tackar och bockar... Det funkar finfint nu.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/10948-fel-på-kod
