---
title: "vad är fel?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10346-vad-är-fel"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "centret"
published: "2001-06-29T11:17:00.000Z"
updated: "2001-06-30T10:12:00.000Z"
replies: 9
views: 226
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/10346-vad-är-fel"
---

# vad är fel?

## #1 — centret, 2001-06-29T11:17Z

Jag får detta felmeddelande när jag försöker öppna databasen:

Microsoft OLE DB Provider for ODBC Drivers error '80040e10' 

\[Microsoft\]\[Drivrutin för ODBC Microsoft Access\] För få parametrar angavs. 1 förväntades. 

/bannerbyte(asp)/login.asp, line 19 

Här är min kod:
\<!--#include virtual="inc/adovbs.inc" --\>
\<% 
' steg 1
if request.querystring("val") = "login" then 
' steg 2
if request.form("epost") = "" then 
response.redirect("login.asp?fel=1")
else
' steg 3
if request.form("pass") = "" then 
response.redirect("login.asp?fel=2")
else
' här öppnas databasen
epost = Request.form("epost")
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "bannerbyte"
Set RecSet = Server.CreateObject("ADODB.Recordset") 
Addera = "SELECT epost, pass FROM medlem WHERE epost=" & epost & " "
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
if request.form("pass") = RecSet("pass") then
'inloggad!
session("inloggad") = Request.form("epost")
response.redirect("inloggad.asp")
else
response.redirect("login.asp?fel=3")
end if
end if
end if
else 
%\>
\<html\>
\<head\>
\<title\>Logga in\</title\>
\<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"\>
\</head\>

\<body bgcolor="#FFFFFF" text="#000000"\>
\<div align="center"\> 
  \<form name="form1" method="post" action="login.asp?val=login"\>
    \<table width="600" border="0" cellspacing="0" cellpadding="0"\>
      \<tr\> 
        \<td bgcolor="#993300"\> 
          \<div align="center"\>\<font color="#FFFFFF"\>Logga in\</font\>\</div\>
        \</td\>
      \</tr\>
      \<tr\> 
        \<td\> 
          \<table width="100%" border="0" cellspacing="0" cellpadding="0"\>
            \<tr\> 
              \<td width="22%"\>E-post\</td\>
              \<td width="78%"\>
                \<input type="text" name="epost"\>
				\<% if Request.querystring("fel") = "1" then %\>
                Du måste fylla i fältet e-post! 
                \<% end if %\>
              \</td\>
            \</tr\>
            \<tr\> 
              \<td width="22%"\>L&ouml;senord\</td\>
              \<td width="78%"\>
                \<input type="text" name="pass"\>				
				\<% if Request.querystring("fel") = "2" then %\>
                Du måste fylla i fältet lösenord! 
                \<% end if %\>

              \</td\>
            \</tr\>
            \<tr\> 
              \<td colspan="2"\> 
                \<div align="center"\>
				\<% if Request.querystring("fel") = "3" then %\>
				Antingen var lösenordet eller användarnamnet fel försök igen!
				\<% end if %\>
 
                  \<input type="submit" name="Submit" value="Logga in"\>
                \</div\>
              \</td\>
            \</tr\>
          \</table\>
        \</td\>
      \</tr\>
    \</table\>
  \</form\>
\</div\>
\</body\>
\</html\>
\<% end if %\>
Jag använder mig av PWS 4.0 .

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

## #2 — @nders, 2001-06-29T11:18Z

```
Addera = "SELECT epost, pass FROM medlem WHERE epost='" & epost & "'"
```

mvh,

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

## #3 — centret, 2001-06-29T11:22Z

Så har du nåt exempel som jag kan ha där istället? Så måste jag också tacka för det otroligt snabba svaret :D.

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

## #4 — @nders, 2001-06-29T11:52Z

jag rättade dig lite i den raden ovan, så prova med den jag gav dig.

mvh,

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

## #5 — centret, 2001-06-29T17:37Z

Nu med din kod får jag detta felmeddelande:
error '80020009' 
Undantag inträffade. 

/bannerbyte(asp)/login.asp, line 19 

ASP var allt lite svårare än jag trodde :x

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

## #6 — @nders, 2001-06-29T17:41Z

vilken är rad 19?

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

## #7 — centret, 2001-06-29T19:10Z

if request.form("pass") = RecSet("pass") then

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

## #8 — icaaq, 2001-06-29T19:23Z

en chansning ;)

vad är request.form("pass") för sorts variabel, testa att convertera den till en string genom att:

```
Cstr(request.form("pass"))
```

Som sagt detta är en chansning :)

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

## #9 — @nders, 2001-06-30T09:17Z

varför har du inte med pass redan i sql-frågan???

så här hade jag gjort. notera öppningen av recordsetet samt sql-frågan.

```
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "bannerbyte"
strSQL = "SELECT epost, pass FROM medlem WHERE epost='" & epost & "' AND pass = '" & request.form("pass") & "'"
set RecSet = Connect.execute(strSQL)
if not RecSet.Eof then
'inloggad!
session("inloggad") = Request.form("epost")
RecSet.Close
Connect.Close
response.redirect("inloggad.asp")
else
RecSet.Close
Connect.Close
response.redirect("login.asp?fel=3")
```

och du, varför kallar du din sql-fråga för Addera? du lägger ju inte till någonting?

red: sen är det alltid bra att stänga objekt innan man gör en response.redirect.

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

## #10 — centret, 2001-06-30T10:12Z

Jag är ganska ny på detta området. Och jag programmerar via idg's guide.
Jag har tidigare hållit på med perl men lade av med det då detta slöar ner servern så grovt.
Så jag e ju glad för att detta forum finns med alla omänskligt bra programmerare ;)

\[Redigerat av centret den 30 jun 2001\]

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/10346-vad-är-fel