---
title: "Buggigt värre."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/132257-buggigt-värre"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Coccozz"
published: "2005-08-03T12:12:36.000Z"
updated: "2005-08-04T22:50:04.000Z"
replies: 7
views: 438
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/132257-buggigt-värre"
---
# Buggigt värre.
## #1 — Coccozz, 2005-08-03T12:12Z
Hallå!
Nu var det dags att göra entré igen. Ett snabbt kik i "Kolla min hemsida" berättar att den nya versionen av uhamn.tk har kommit upp efter många om och men. Dock är det så att en av underavdelningarna på sidan buggar ganska rejält.
Avdelningen jag talar om är "Evenemang". ([länk](http://ccc.1asphost.com/uhamn/Undersidor/Evenemang/veckan.asp)).
Koden som visar (skall visa) vad som händer i veckan ser ut som följer:
```
<%vecka = DatePart("WW", now(),vbMonday,vbFirstFourDays)
Set Databas = Server.CreateObject( "Adodb.Connection" )
Databas.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath( "../../db/evenemang.mdb" )
Databas.ConnectionString = "Data Source='" & MdbFilePath & "'"
Databas.open
strSQL = "SELECT * FROM handelser WHERE vecka = " & vecka & " AND dag = 1 ORDER BY ID DESC"
Set objRS = Databas.Execute(strSQL)
IF objRS.EOF THEN
response.write ""
ELSE response.write ""
response.write ""
response.write "| MÅNDAG | "
response.write "
"
response.write "
"
Do Until objRS.EOF
titel = (objRS("titel"))
pris = (objRS("pris"))
id = (objRS("id"))
response.write ""
response.write ""
response.write "| " & titel & " | "
response.write "Pris: " & pris & ",- | "
response.write "
"
response.write "
"
objRS.MoveNext
Loop
Set objRS = Nothing
END IF
strSQL = "SELECT * FROM handelser WHERE vecka = " & vecka & " AND dag = 2 ORDER BY ID DESC"
Set objRS = Databas.Execute(strSQL)
IF objRS.EOF THEN
response.write ""
ELSE response.write ""
response.write ""
response.write "| TISDAG | "
response.write "
"
response.write "
"
Do Until objRS.EOF
titel = (objRS("titel"))
pris = (objRS("pris"))
id = (objRS("id"))
response.write ""
response.write ""
response.write "| " & titel & " | "
response.write "Pris: " & pris & ",- | "
response.write "
"
response.write "
"
objRS.MoveNext
Loop
Set objRS = Nothing
```
Och så fortsätter den med samma kodsnutt tills "vecka = " & vecka & " AND dag=7".
Rendera sidan några gånger så förstår ni snart problemet. För säkerhets skull lägger jag dock upp felmeddelandet här:
```
Microsoft JET Database Engine error '80040e10'
No value given for one or more required parameters.
/uhamn/undersidor/evenemang/veckan.asp, line 285
```
Raden kan variera, men innehållet är det samma, bara olika dagars kodsnuttar. Kodraden:
```
Set objRS = Databas.Execute(strSQL)
```
Vad är det som är fel. Varför uppstår felet bara ibland?
Tack//
Permalänk: https://www.webforum.nu/p/132257
## #2 — Jesper T, 2005-08-03T12:18Z
No value given for one or more required parameters =
Inget värde är angett för en eller flera nödvändiga parametrar
Vid liknande fel skriv alltid ut frågan.
```
Response.write "Debug: "& strSQL
Response.end
```
Antagligen saknas veckan
Permalänk: https://www.webforum.nu/p/1653607
## #3 — Coccozz, 2005-08-03T14:47Z
Problemet är bara det att felmeddelandet bara uppstår ibland. Det är inget konsekvent. Pröva nu [länken](http://ccc.1asphost.com/uhamn/undersidor/evenemang/veckan.asp) med din debugtext på. Du kommer se att allt stämmer, uppdatera sedan en eller flera gånger tills du får felmeddelandet.
Ibland får man det tredje gången och ibland kan man hålla på hundra gånger utan att få det. Frågan är bara varför...
Permalänk: https://www.webforum.nu/p/1653667
## #4 — lilja, 2005-08-03T15:51Z
Microsoft JET Database Engine error '80040e10'
No value given for one or more required parameters.
/uhamn/undersidor/evenemang/veckan.asp, line 196
ha, ja det fungerade ju för mig i alla fall. Det hände efter att jag hållit inne F5 någon sekund...
Permalänk: https://www.webforum.nu/p/1653690
## #5 — Coccozz, 2005-08-03T16:20Z
Det var ju ett svar som hjälpte föga. Någon som vet varför det buggar ur?
Permalänk: https://www.webforum.nu/p/1653695
## #6 — Guffa, 2005-08-04T11:59Z
Jag kan inte säga vad som orsakar felmeddelandet. Det verkar ju inte vara det uppenbara, att det är fel på databasfrågorna, så det torde ju vara ett följdfel av någonting annat.
Ta bort apostroferna runt filnamnet:
Databas.ConnectionString = "Data Source=" & MdbFilePath
Varför kör du inte en enda databasfråga och sorterar på dag, istället för att köra sju?
Permalänk: https://www.webforum.nu/p/1653870
## #7 — Coccozz, 2005-08-04T12:03Z
Ifall jag bara kör en databasfråga som sorterar på dag, blir det inte då omöjligt att få uppställningen:
```
Måndag
----------
Sommarmåndag
sommarmåndag2
Tisdag
---------
Sommartisdag
osv...
```
Eller är det möjligt att lösa detta med någon sorts IF-sats. Effektivisering av detta skriptet är mycket välkommet, det är en flaskhals...
Permalänk: https://www.webforum.nu/p/1653873
## #8 — Coccozz, 2005-08-04T22:50Z
Efter att rättat till lite i koden och loopat ut den istället renderar sidan både snabbare och buggar mindre, verkar det iaf. som just nu. Får se hur det blir.
Förslag på effektivare kodsnutt mottages gärna, loopen bygger till 99,7% på koden från ovan med separata databasfrågor.
Permalänk: https://www.webforum.nu/p/1654016
---
Tråden på webben: https://www.webforum.nu/amne/asp/132257-buggigt-värre