---
title: "Felmess"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/62326-felmess"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "sudden"
published: "2002-12-16T10:58:31.000Z"
updated: "2002-12-16T11:30:39.000Z"
replies: 23
views: 434
page: 1
pages: 2
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/62326-felmess"
---

# Felmess

_Sida 1 av 2._

## #1 — sudden, 2002-12-16T10:58Z

Hej!
Jag får det här meddelandet:

ADODB.Recordset error '800a0bb9' 

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. 

/script1987/spelaroll/check.asp, line 17 

På denna kod:

```
<%@Language = VBScript%>
<html>
<body bgcolor="#7B7875">

<%
Dim Conn, RS, bolFinnRedan
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\script1987\db\databas.mdb")

If ((Request.Form("namn") = "") OR (Request.Form("efternamn") = "")_
   OR (Request.Form("epost") = "") OR (Request.Form("nick") = "")_
   OR (Request.Form("pass") = "") OR (Request.Form("info") = "")) Then
  Response.Redirect"start.asp?page=REG"
Else
   bolFinnsRedan = false
   Set RS = Server.CreateObject("ADODB.Recordset")
   [B]RS.Open anvandare, Conn, , adLockOptimistic, adCmdTable[/B]
   Do While Not (RS.EOF OR bolFinnsRedan)
    
    If (StrComp(RS("Epost"), Request.Form("epost"),_
          vbTextCompare) = 0) Then
     Response.Write"Denna epost existerar redan" & "<br>"
     Response.Write"<a href='start.asp?page=REG' target='_top'>Tillbaka</a>"
     bolFinnsRedan = True
    End If
   
    If (StrComp(RS("Nick"), Request.Form("nick"),_
          vbTextCompare) = 0) Then
     Response.Write"Användarnamnet finns redan, välj ett annat" & "<br>"
     Response.Write"<a href='start.asp?page=REG' target='_top'>Tillbaka</a>"
     bolFinnsRedan = True
    End If
    
    If (StrComp(RS("Losen"), Request.Form("pass"),_
          vbTextCompare) = 0) Then
     Response.Write"Lösenordet är upptaget" & "<br>"
     Response.Write"<a href='start.asp?page=REG' target='_top'>Tillbaka</a>"
     bolFinnsRedan = True
    End If
    RS.MoveNext
  Loop
  
  If Not bolFinnsRedan Then
    RS.AddNew
    
    RS("ForNamn") = Request.Form("fornamn")
    RS("EfterNamn") = Request.Form("efternamn")
    RS("Epost") = Request.Form("epost")
    RS("City") = Request.Form("city")
    RS("Year") = Request.Form("year")
    RS("Month") = Request.Form("month")
    RS("Day") = Request.Form("day")
    RS("Nick") = Request.Form("nick")
    RS("Losen") = Request.Form("pass")
    RS("Kon") = Request.Form("kon")
    RS("Info") = Request.Form("info")
   RS.Update
   Response.Write"Sådärja =) Nu kan du börja träffa nya vänner!" & "<br>"
   Response.Write"<a href='start.asp' target='_top'>Logga in</a>"
  End If
  RS.Close
  Set RS = Nothing
 End If
 Conn.Close
 Set Conn = Nothing
%>
  </body>
  </html>
```

Vad är det som orsakar felet??

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

## #2 — Josef, 2002-12-16T11:01Z

Jag ser ingen SQL-sträng som heter användare... Sedan så måste du väl includera adovbs.inc???

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

## #3 — sudden, 2002-12-16T11:04Z

Jag använder ingen SQL sträng i koden!
Scriptet ska kolla om användaren har fyllt i alla uppgifter från formulären...samt kolla om användarnamnet eller lösenordet redan existerar!
Om inte så läggs uppgifterna till i databasen!

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

## #4 — Josef, 2002-12-16T11:06Z

Men du måste väl ändå specificera vilken tabell posten skall läggas i???

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

## #5 — Ekström, 2002-12-16T11:06Z

Hur tänkte du kolla om det finns i databasen om du inte har någon SQL-sträng?

Prova också

```
RS.Open anvandare, Conn, adLockOptimistic, adCmdTable
```

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

## #6 — sudden, 2002-12-16T11:06Z

Ja precis...och den tabellen heter anvandare.

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

## #7 — Josef, 2002-12-16T11:08Z

Prova ändå att ha en SQL:

```
SELECT * FROM anvandare
```

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

## #8 — sudden, 2002-12-16T11:09Z

Jag ska prova det =)

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

## #9 — sudden, 2002-12-16T11:12Z

Den vill ändå inte funka! =(

Här är koden:

```
<%@Language = VBScript%>

<html>
<body bgcolor="#7B7875">

<%
Dim Conn, RS, bolFinnRedan
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\script1987\db\databas.mdb")

If ((Request.Form("namn") = "") OR (Request.Form("efternamn") = "")_
   OR (Request.Form("epost") = "") OR (Request.Form("nick") = "")_
   OR (Request.Form("pass") = "") OR (Request.Form("info") = "")) Then
  Response.Redirect"start.asp?page=REG"
Else
   bolFinnsRedan = false
  SQl = "SELECT * FROM anvandare"
   Set RS = Server.CreateObject("ADODB.Recordset")
   [B]RS.Open SQL, Conn, adLockOptimistic, adCmdTable[/B]
   Do While Not (RS.EOF OR bolFinnsRedan)
    
    If (StrComp(RS("Epost"), Request.Form("epost"),_
          vbTextCompare) = 0) Then
     Response.Write"Denna epost existerar redan" & "<br>"
     Response.Write"<a href='start.asp?page=REG' target='_top'>Tillbaka</a>"
     bolFinnsRedan = True
    End If
   
    If (StrComp(RS("Nick"), Request.Form("nick"),_
          vbTextCompare) = 0) Then
     Response.Write"Användarnamnet finns redan, välj ett annat" & "<br>"
     Response.Write"<a href='start.asp?page=REG' target='_top'>Tillbaka</a>"
     bolFinnsRedan = True
    End If
    
    If (StrComp(RS("Losen"), Request.Form("pass"),_
          vbTextCompare) = 0) Then
     Response.Write"Lösenordet är upptaget" & "<br>"
     Response.Write"<a href='start.asp?page=REG' target='_top'>Tillbaka</a>"
     bolFinnsRedan = True
    End If
    RS.MoveNext
  Loop
  
  If Not bolFinnsRedan Then
    RS.AddNew
    
    RS("ForNamn") = Request.Form("fornamn")
    RS("EfterNamn") = Request.Form("efternamn")
    RS("Epost") = Request.Form("epost")
    RS("City") = Request.Form("city")
    RS("Year") = Request.Form("year")
    RS("Month") = Request.Form("month")
    RS("Day") = Request.Form("day")
    RS("Nick") = Request.Form("nick")
    RS("Losen") = Request.Form("pass")
    RS("Kon") = Request.Form("kon")
    RS("Info") = Request.Form("info")
   RS.Update
   Response.Write"Sådärja =) Nu kan du börja träffa nya vänner!" & "<br>"
   Response.Write"<a href='start.asp' target='_top'>Logga in</a>"
  End If
  RS.Close
  Set RS = Nothing
 End If
 Conn.Close
 Set Conn = Nothing
%>
  </body>
  </html>
```

Vad kan vara fel?

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

## #10 — Josef, 2002-12-16T11:14Z

Vad får du för felmeddelande?

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

## #11 — sudden, 2002-12-16T11:15Z

ADODB.Recordset error '800a0bb9' 

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. 

/script1987/spelaroll/check.asp, line 19

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

## #12 — Josef, 2002-12-16T11:17Z

Prova att byta ut adLockOptimistic, adCmdTable mot deras egentliga konstanter, eftersom du, vad jag kan se, inte inkluderar adovbs.inc...

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

## #13 — sudden, 2002-12-16T11:19Z

Du menar: **Const adLockOptimistic** och   **Const adCmdTable**?

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

## #14 — Josef, 2002-12-16T11:20Z

Nej, till de siffror som de egentligen hänvisar till.
(Tror att det är 3 o 3)

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

## #15 — Ekström, 2002-12-16T11:21Z

adLockOptimistic har jag för mig är 3, den andra vet jag inte. Kola i adobvs.inc sudden, så förstår du.

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

## #16 — sudden, 2002-12-16T11:21Z

Hmm..nu hänger jag inte riktigt med här!
Hur gör jag det?

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

## #17 — voigtann1, 2002-12-16T11:23Z

```
RS.Open anvandare, Conn, 3, 3
```

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

## #18 — sudden, 2002-12-16T11:23Z

Okej...så det blir ungefär såhär: **Const adLockOptimistic = 3** ??

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

## #19 — sudden, 2002-12-16T11:23Z

Jaha! =)
Tackar tackar!

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

## #20 — Ekström, 2002-12-16T11:25Z

adLockOptimistic och adCmdTable är vanliga konstanter, som finns i adobs.inc.

Kolla i adobvs.inc så ser du att det ser ut typ:

```
adLockOptimistic        =       3
```

osv.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/62326-felmess  
Nästa sida: https://www.webforum.nu/amne/asp/62326-felmess/page2.md