---
title: "Den vill inte köra det första utan.."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/103190-den-vill-inte-köra-det-första-utan"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "medialabs"
published: "2004-05-07T17:02:53.000Z"
updated: "2004-05-07T17:46:56.000Z"
replies: 2
views: 202
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/103190-den-vill-inte-köra-det-första-utan"
---

# Den vill inte köra det första utan..

## #1 — medialabs, 2004-05-07T17:02Z

Utan kör det under sql-uttrycket. Jag har testat och böjt på det mesta nu och kommit fram att om jag byter plats på dem båda sql så körs den undre sql-uttrycket. Så något är knas. Jag uppskattar verkligen om ni skulle kunna lösa detta tillsammans med mig. Jag har rivit mig i håret ca en månad nu. 

```

Set Con = Server.CreateObject("ADODB.Connection")
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=g:\************.mdb"

strSQL = "Select id from tbluppgifter where strusername = " & _
  SQLText(Request.Form("client")) & " and strpassword = " & _ 
  SQLText(Request.Form("password"))

Set RecSet = Server.CreateObject("ADODB.Recordset")
RecSet.Open strSQL, Con

If Not RecSet.EOF Then
  Session("authentication") = "yes" 
  Session("id") = RecSet("id")

  'Uppdatera databasen med användarens IP och sedan plussa på med ett på inloggningsräknaren.
  [b]strSQL = "UPDATE tbluppgifter SET strlastIP = '" & Request.ServerVariables("REMOTE_ADDR") & "' WHERE id = " & RecSet("id")[/b]
  [b]strSQL = "UPDATE tbluppgifter SET strbesok=strbesok+1  WHERE id = " & RecSet("id")[/b]

  Con.Execute strSQL, , 128

  RecSet.Close
  Set RecSet = Nothing
  Con.Close
  Set Con = Nothing

  Response.Redirect "/swe/index.asp"
Else
  'Stäng anslutningen till databasen
  RecSet.Close
  Set RecSet = Nothing
  Con.Close
  Set Con = Nothing
```

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

## #2 — Peeer, 2004-05-07T17:40Z

Inte så konstigt egentligen. Du lagrar sql-satsen i en variabel, sen skriver du över variabeln med en annan sql-sats på raden under. :)

```
strSQL = "UPDATE tbluppgifter SET strlastIP = '" & Request.ServerVariables("REMOTE_ADDR") & "' WHERE id = " & RecSet("id")
Con.Execute strSQL, , 128
strSQL = "UPDATE tbluppgifter SET strbesok=strbesok+1  WHERE id = " & RecSet("id")
Con.Execute strSQL, , 128
```

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

## #3 — medialabs, 2004-05-07T17:46Z

Tack Peeer!

Äntligen har man fått det förklarat. Nu fungerar det som det var tänkt :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/103190-den-vill-inte-köra-det-första-utan