---
title: "Problem med hemsida"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/61777-problem-med-hemsida"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "sudden"
published: "2002-12-10T10:44:10.000Z"
updated: "2002-12-10T12:51:46.000Z"
replies: 5
views: 254
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/61777-problem-med-hemsida"
---

# Problem med hemsida

## #1 — sudden, 2002-12-10T10:44Z

Hej!
Jag har lite problem med min kod!
När jag försöker köra min sida så får jag det här meddelandet:

Feltyp:
ADODB.Recordset (0x800A0BB9)
Parametrarna är felaktiga, ligger utanför tillåtet intervall eller skapar en inbördes konflikt.
/laktos/default.asp, line 718

Här är koden:

```
If Request.QueryString("category") = "ADDUSER" Then

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:/inetpub/wwwroot/laktos/databas.mdb"

Set RS = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM users"
[B]RS.Open SQL, Connect, adLockOptimistic, adCmdTable[/B]
 RS.AddNew
 RS("NAMN") = Request.Form("namn")
 RS("NICK") = Request.Form("nick")
 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("KON") = Request.Form("kon")
 RS("INFO") = Request.Form("info")
RS.Update
RS.MoveFirst

 RS.Close
 Set RS = Nothing
 Connect.Close
 Set Connect = Nothing

Else

Response.Redirect("default.asp")
End If
```

Är det någon som kan?   snälla!!

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

## #2 — Eitraz, 2002-12-10T10:48Z

Ska inte vara några "" runt SQL i RS.Open satsen va?

\-Eitraz

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

## #3 — sudden, 2002-12-10T10:50Z

Det har du nog rätt i.
Men borde inte webbläsaren generera ett felmeddelande istället för att tänka en hel evighet?
Verkar wierd!

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

## #4 — sudden, 2002-12-10T11:37Z

Är det någon som kan hjälpa ?  :( 
Behöver få det här fixat!

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

## #5 — Vide, 2002-12-10T12:31Z

Har du inkluderat deklarerat som du använder någonstans? Kanske inkluderat dom i adovbs.inc?

Mvh, Vide

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

## #6 — icaaq, 2002-12-10T12:51Z

Jag skulle gjort så här

```
[red]
If Request.QueryString("category") = "ADDUSER" Then

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:/inetpub/wwwroot/laktos/databas.mdb"

strSql = "INSERT INTO users(NAMN, NICK, EPOST, CITY, YEAR, MONTH, DAY, KON, INFO)"&_
"VALUES('"&Trim(Request.Form("namn"))&"', "&_
"'"&Trim(Request.Form("nick"))&"', "&_
"'"&Trim(Request.Form("epost"))&"', "&_
"'"&Trim(Request.Form("city"))&"', "&_
"'"&Trim(Request.Form("year"))&"', "&_
"'"&Trim(Request.Form("month"))&"', "&_
"'"&Trim(Request.Form("day"))&"', "&_
"'"&Trim(Request.Form("kon"))&"', "&_
"'"&Trim(Request.Form("info"))&"')"
Connect.Execute(strSql),,128
Set Connect = Nothing

Else

Response.Redirect("default.asp")
End If
[/red]
```

Med reservation att du kanske har en äldre variant av access och att du har fälten year, month och day i datum/tid format, då ska du byta ut enkelfnuttarna(') mot brädgårdar(#) 
mvh icaaq

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/61777-problem-med-hemsida