---
title: "SQL-problem"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/81983-sql-problem"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Sebbe"
published: "2003-07-14T16:13:31.000Z"
updated: "2003-07-14T20:01:00.000Z"
replies: 6
views: 232
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/81983-sql-problem"
---

# SQL-problem

## #1 — Sebbe, 2003-07-14T16:13Z

Var inte säker på om jag skulle lägga den här frågan i ASP eller SQL-forumet, men jag lägger den här.

Jag kör den här koden:

```
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("serie.mdb")
strSQL = "INSERT INTO matcher (omg, datum, hemmalag, bortalag, hemmamal, bortamal) VALUES (" & intOmg & ", #" & dtmDatum & "#, '" & strHemmalag & "', '" & strBortalag & "', " & intHemmamal & ", " & intBortamal & ")"
objConn.Execute(strSQL)

If CInt(intHemmamal) > CInt(intBortamal) Then
  strSQL = "UPDATE lag SET vunna = vunna + 1 WHERE namn = '" & strHemmalag & "'"
  objConn.Execute(strSQL)
  strSQL = "UPDATE lag SET förlorade = förlorade + 1 WHERE namn = '" & strBortalag & "'"
ElseIf CInt(intHemmalag) < CInt(intBortamal) Then
  strSQL = "UPDATE lag SET vunna = vunna + 1 WHERE namn = '" & strBortalag & "'"
  objConn.Execute(strSQL)
  strSQL = "UPDATE lag SET förlorade = förlorade + 1 WHERE namn = '" & strHemmalag & "'"
ElseIf CInt(intHemmlag) = CInt(intBortalag) Then
  strSQL = "UPDATE lag SET oavgjorda = oavgjorda + 1 WHERE namn = '" & strHemmalag & "'"
  objConn.Execute(strSQL)
  strSQL = "UPDATE lag SET oavgjorda = oavgjorda + 1 WHERE namn = '" & strBortalag & "'"
End If

objConn.Execute(strSQL)

strSQL = "UPDATE lag SET gjorda = gjorda + " & intHemmamal & ", inslappta = inslappta + " & intBortamal & " WHERE namn = '" & strHemmalag & "'"
objConn.Execute(strSQL)
strSQL = "UPDATE lag SET gjorda = gjorda + " & intBortamal & ", inslappta = inslappta + " & intHemmamal & " WHERE namn = '" & strBortalag & "'"
objConn.Execute(strSQL)

objConn.Close : Set objConn = Nothing
Response.Redirect("default.asp?do=schema")
```

Problemet är det att ingen av SQL-satserna efter INSERT-satsen verkar köras. Det är som om Response.Redirecten körs direkt efter den. Ändå har jag testat att skriva ut en av de frågorna för att de om den koden körs, och frågan skrivs ändå ut! Jag testade även att skapa ett helt nytt connection-object till UPDATE-frågorna, men ingen skillnad.
Hoppas att någon fattar vad jag menar i alla fall. :)

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

## #2 — LarsG, 2003-07-14T16:26Z

ElseIf CInt(intHemmalag) -- stämmer väl inte

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

## #3 — Sebbe, 2003-07-14T16:34Z

**/red** Läste fel. Tack LarsG, ska testa om dte funkar. :)

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

## #4 — solbulle, 2003-07-14T17:14Z

Vad händer då om du skriver ut ALLA sqlsatser, samt bortkommenterar din redirect?
Blir det rätt satser som skrivs ut med tanke på vad intHemmamal mm innehåller?

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

## #5 — Sebbe, 2003-07-14T18:34Z

Solbulle: Ja, de visar rätt, allihopa.

Nu ser koden ut såhär, fortfarande samma problem. Alla SQL-exekveringar efter INSERT-satsen körs inte.

```
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("serie.mdb")
strSQL = "INSERT INTO matcher (omg, datum, hemmalag, bortalag, hemmamal, bortamal) VALUES (" & intOmg & ", #" & dtmDatum & "#, '" & strHemmalag & "', '" & strBortalag & "', " & intHemmamal & ", " & intBortamal & ")"
objConn.Execute(strSQL)

If CInt(intHemmamal) > CInt(intBortamal) Then
  strSQL = "UPDATE lag SET vunna = vunna + 1 WHERE namn = '" & strHemmalag & "'"
  objConn.Execute(strSQL)
  strSQL = "UPDATE lag SET förlorade = förlorade + 1 WHERE namn = '" & strBortalag & "'"
ElseIf CInt(intHemmamal) < CInt(intBortamal) Then
  strSQL = "UPDATE lag SET vunna = vunna + 1 WHERE namn = '" & strBortalag & "'"
  objConn.Execute(strSQL)
  strSQL = "UPDATE lag SET förlorade = förlorade + 1 WHERE namn = '" & strHemmalag & "'"
ElseIf CInt(intHemmamal) = CInt(intBortamal) Then
  strSQL = "UPDATE lag SET oavgjorda = oavgjorda + 1 WHERE namn = '" & strHemmalag & "'"
  objConn.Execute(strSQL)
  strSQL = "UPDATE lag SET oavgjorda = oavgjorda + 1 WHERE namn = '" & strBortalag & "'"
End If

objConn.Execute(strSQL)

strSQL = "UPDATE lag SET gjorda = gjorda + " & intHemmamal & ", inslappta = inslappta + " & intBortamal & " WHERE namn = '" & strHemmalag & "'"
objConn.Execute(strSQL)
strSQL = "UPDATE lag SET gjorda = gjorda + " & intBortamal & ", inslappta = inslappta + " & intHemmamal & " WHERE namn = '" & strBortalag & "'"
objConn.Execute(strSQL)

objConn.Close : Set objConn = Nothing
Response.Redirect("default.asp?do=schema")
```

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

## #6 — solbulle, 2003-07-14T19:46Z

Sätt 0 (noll) som standardvärde i dina kolumner. ;)

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

## #7 — Sebbe, 2003-07-14T20:01Z

> **solbulle skrev:**
>
> Sätt 0 (noll) som standardvärde i dina kolumner. ;)

Visste jag väl redan? ;)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/81983-sql-problem